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1 100% di superficie 
• testata “error free” 
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• di Burnishing 



Speciale 

lubrificazione 



Certificazione 

totale 


Solo Dysan garantisce che 
tutta la superficie della 
diskette sia realmente 
100% “error free”: un test 
esclusivo certifica le tracce 
e lo spazio tra le tracce 
assicurando prestazioni 
“error free” anche in 
presenza di 
disallineamento delle 
testine. 


Solo Dysan garantisce una 
superficie “a specchio” 
grazie alla sua avanzata ed 
unica tecnica di 
“burnishing” - questo 
risultato assicura un 
miglior segnale sulle 
tracce, una minor 
turbolenza sulle testine, 
consentendo un sicuro 
mantenimento dei dati 
dopo milioni e milioni di 
rotazioni. 


Solo Dysan garantisce, 
mediante uno speciale 
procedimento di 
lubrificazione, ottenuto 
trattando la superficie con 
il proprio esclusivo 
lubrificante DY 10, che le 
prestazioni “error free” 
siano esaltate e mantenute 
nel tempo. 


Solo Dysan garantisce, con 
il suo metodo automatico 
di controllo qualità di tutta 
la produzione (risultato di 
una tecnologia leader nel 
mondo) che ogni diskette 
prodotta sia stata 
singolarmente testata e 
certificata. 
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Modem a confronto 

Banche dati, host, reti: come collegarsi con l’Apple e come scegliere 
l’accoppiatore acustico adatto. 


19 


//e contro//c: cosa c’é di incompatibile. 

Ma sono davvero compatibili? Applicando ha provato i programmi più 
comuni in commercio e ha scoperto che... 


22 


2 giorni con un Apple 

Per tutti la possibilità di passare un fine settimana insieme a un Ile o a un 
Macintosh, e col tagliando di Applicando... 


27 


Fuoco fatuo e notti insonni 

Un adventure game che mette in difficoltà anche i più esperti. Quando poi 
si pensa di aver risolto l’enigma... 


40 



Il basic del Macintosh 

Si chiama Ms-Basic e permette di programmare con il Mac. Ecco come si 
usa e i primi comandi per... 


Modem a confronto, pagina 12 
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Appliscuola: animazione e forze parallele 

Continua la rubrica di programmi didattici dedicata a insegnanti e studenti 
curata da Enzo Tonti. 


59 

67 

74 


La funzione del parente 

La regola della gerarchia, quella della sequenza e quella dell’ombra. Nella 
quinta puntata del corso di Pasca!. 

Tanti punti per l’artista 

Per destreggiarsi nella grafica ad alta risoluzione sono sufficienti un 
Apple//, un televisore a colori e... 

Un calendario in memoria 

Una routine che permette di pokerare la data in memoria e richiamarla 
quando si vuole. 



Apple artista, pagina 67 


77 


Indice elettronico 

Un metodo automatico per trovare quello di cui hai bisogno nelle Pagine 
del Software... 


Le rubriche 

6 Applichi 
IOApplicosa 
79 Lettere 
79 Mercatino delle mele 
84 Appliquanto 
90 Disk Service 

Disegno di copertina: 

Studio Acrilico 


Per tutti gratis 
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Mac o con II c 
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La mela in cattedra, pagina 43 


MICROSOFT 

BASIC 



Il Basic per Mac, pagina 40 
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DIREZIONE GENERALE E AMMINISTRAZIONE 



20122 Milano - Corso Monforte, 39 
Telefono (02) 702429 


DIRETTORE RESPONSABILE 
Stefano Benvenuti 

CAPOREDATTORE 
Paolo Artemi 

COLLABORATORI 
Giorgio Caironi 
Flavia Dozio 
Rossana Galliani 
Sergio Lancellotti 
Mario Magnani 
Alessandro Mazzetti 
Dolma Poli 
Domenico Semprini 

PUBBLICHE RELAZIONI 
Mauro Gandini 

REALIZZAZIONE EDITORIALE 
Editing Studio 


Tutti i diritti di riproduzione e traduzio¬ 
ne di testi, articoli, progetti, illustra¬ 
zioni, disegni, listati di programmi, fo¬ 
tografie ecc., sono riservati a termini 
di legge. I programmi pubblicati su 
Applicando possono essere utilizzati 
per scopi privati, scientifici e dilettan¬ 
tistici, ma ne sono vietati sfruttamenti 
e utilizzazioni commerciali. I mano¬ 
scritti, i disegni, le foto anche se non 
pubblicati, non si restituiscono. 

• 

..Servizio abbonamenti: Editronicasrl. 
C.so Monforte 39, Milano - Conto 
Corrente Postale n. 19740208 - Una 
copia L. 5.000. Arretrati 7.000 lire. 
Abbonamento 10 numeri (senza do¬ 
no) L. 40.000 (estero L. 60.000). Ab¬ 
bonamento 10 numeri, più le Pagine 
del Software per Apple, L. 50.000 
(estero 70.000). Periodico mensile - 
Stampa: La Commerciale, Via Fabio 
Filzi 16, Treviglio - Distribuzione e 
diffusione: A & G S.p.A. - Via Fortez¬ 
za 27 - Milano - Fotocomposizione: 
News, Via Nino Bixio 6, Milano - ® 
Copyright 1983 by Editronica srl - Re¬ 
gistrazione Tribunale di Milano n. 24 
del 15.1.1983 - Pubblicità inferiore al 
70% 



Applicando ha Tatto 38: da questo numero, intatti, 
ogni 38 giorni sarà possibile ricevere a casa o in ufficio, 
in studio o in laboratorio, una nuova copia della rivista di 
idee e proposte per 1 computer Apple. Perché Applicando 
diventa mensile? Fondalmente per tre motivi: per prima cosa, 
\\ mondo Apple, e quello dei personal computer in generale, 
è un ribollire continuo di novità e cambiamenti e rende 
indispensabile un mezzo di informazione tempestivo. Poi un 
sondaggio, svolto su un campione di lettori, indica senza 
incertezze di sorta, che le preferenze vanno alla cadenza 
mensile. Infine la redazione, che si è rinforzata in modo da 
poter offrire programmi e recensioni sempre più di qualità e 
attuaiità. 

Cosa succederà per gii abbonamenti? Proprio in 
questi giorni a tutti gli abbonati è stata spedita una 
lettera nella quale viene precisato come sarà possibile 
continuare a ricevere, una volta scaduto rabbonamento in 
corso, i numeri di Applicando. 

Ma ecco i contenuti di questo mumero. Più di un 
lettore sarà rimasto sorpreso dalla vivacità e giocosità 
delia copertina, sicuramente un po' insolita. Applicando non 
intende con questa scelta battere la strada del videogioco 
ma soltanto testimoniare un fenomeno, quello degli adventure 
game, che sta riscuotendo grande successo e offrire un 
supporto didattico a chi è interessato a questo tipo di 
programmazione (pagina 27). 

Il professor Enzo Tonti, nella seconda puntata delle 
pagine per insegnanti e allievi, spiega come sommare forze 
paraiìe e come animare una figura piana (pagina 43); Marco 
Anelli ha messo a confronto cinque modelli di modem (pagina 
12); Mario Magnani ha verificato la compatibilità software e 
hardware fra /Ve e //e (pagina 19). Giorgio Caironi analizza 
l'Ms-Basic il nuovo sistema operativo delia Microsoft che 
consente di creare programmi con il Mac (pagina 48); poi la 
puntata del Pascal (di Alessandro Mazzetti, a pagina 59), un 
programma dì grafica (pagina 67), una utility per datare i 
dischetti (pagina 74), le rubriche e... altro ancora. 
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A cavallo 
con Macintosh 

L’ultima stella che hanno 
portato in Italia si chiama 
Premium Lobell, il cavallo 
americano di 4 anni che de¬ 
tiene attualmente il record 
mondiale di velocità: il 1° 
settembre a Du Quoin ha 
corso il miglio col fantastico 
tempo di 1.54.3 (pari a 
1.11.2 sul chilometro). Ma a 
trasportare campionissimi 
del genere, i fratelli Sivieri 
sono abituati. Gestiscono, 
infatti, il 95% del movimen¬ 
to dei cavalli da corsa che 
gareggiano in tutti gli ippo¬ 
dromi italiani. 

Mario Sivieri, responsabi¬ 
le della Tast cavalli, si occu¬ 
pa del settore internaziona¬ 
le, mentre Tino cura il movi¬ 
mento su territorio naziona¬ 
le attraverso una seconda 
società, la Fratelli Sivieri. 

Da qualche mese, ad assi¬ 


stere i due nella loro attività 
è arrivato un Macintosh che 
è stato immediatamente uti¬ 
lizzato per immagazzinare i 
vari programmi delle corse 
negli ippodromi, di tenere 
aggiornati gli appuntamenti 
dei cavalli, di segnalare e 
preventivare le diverse tarif¬ 
fe ma anche ad aggiornare 
tutta la normativa burocrati¬ 
co sanitaria necessaria a 
spostare un cavallo da un 
paese all’altro. «Trovo che il 
Macintosh sia fantastico» di¬ 
ce Mario Sivieri, «e adesso 
non aspetto altro che l’e¬ 
spansione a 512 KB per po¬ 
ter finalmente gestire buona 
parte del lavoro che mi tro¬ 
vo davanti, si fa per dire, so¬ 
lo con un dito.» 

In pratica i fratelli Sivieri 
offrono all’allevatore o al¬ 
l’allenatore che intendono 
far raggiungere a un cavallo 
qualsiasi destinazione, un 
servizio completo che va 
dalla soluzione dei problemi 


di trasporti a quelli sanitari, 
di sdoganamento, incarta¬ 
menti vari etc. I Sivieri, inol¬ 
tre, si occupano anche della 
selezione dei purosangue, 
organizzando anche l’accop¬ 
piamento di campioni. 

«Ci sono un’infinità di 
grandi e piccole cose da te¬ 
nere presenti in questa atti¬ 
vità», dice Mario Sivieri, «e 
per permettere al Macintosh 
di gestirle tutte ci vorrebbe 
un profile grosso almeno 
quanto una stalla. Il compu¬ 
ter, anche se non riesce a 
risolvere tutto, elimina i la- 


Mario e Tino Sivieri con il 
cavallo Natascia Imperiai, 
razza La Novella, allenato da 
PaoloMiglini,5° nella 
graduatoria Italiana. 


vori ripetitivi. Il programma 
che uso maggiormente è 
l’Habadex, una superagen- 
da che utilizzo per riordina¬ 
re, stampare, ricordare e ge- 
sfTre tutte le corse. È ormai 
diventato il mio Trotto 
Sportsman personale pron¬ 
to, in ogni momento, sul vi¬ 
deo per essere sfogliato». 
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La mela 
è di moda 

Il computer fa moda, ed è 
possibile col suo aiuto impa¬ 
rare il Made in Italy. Ci sta 
provando l’Istituto artistico 
deirabbigliamento Maran¬ 
goni, di Milano, che con un 
Apple sta mettendo a punto 
un programma che consenti¬ 
rà ai suoi alunni di misurare 
le proprie capacità alla ta¬ 
stiera. Ad assumersi onori 
ed oneri deirinsegnamento 
è Fabio Marangoni, tren¬ 
tanni, al timone, col padre, 
dell’istituto Marangoni. 

«Anche se gli utilizzi pre¬ 
minenti sono la contabilità 
per l’Apple II e la gestione 
dei corsi per l’Apple ///», di¬ 
ce Marangoni Jr, «con un 
mercato della moda orienta¬ 
to verso soluzioni grafiche 
sempre più sofisticate, è di¬ 
ventato naturale ricorrere a 
plotter, tavolette grafiche e 
mouse. Ecco perché stiamo 
studiando un programma 
che consenta di realizzare 
bozzetti direttamente col 
computer». 

Per ora ad accogliere gli 
alunni c’è un Apple/// che, 
posto in primo piano sul 
bancone della segreteria. 


Fabio Marangoni, manager 
dell’Istituto Marangoni. 


provvede a gestire tutto l’in¬ 
sieme delle problematiche 
dell’istituto. Il programma 
di accoglienza, studiato dal¬ 
lo stesso Marangoni e realiz¬ 
zato da un programmatore, 
prevede l’utilizzo del profile 
e lavora con un menu estre¬ 
mamente funzionale, con 
più di venti opzioni e diversi 
sottomenu. Per ogni corso 
vengono visualizzati i tempi, 
i costi, gli insegnanti, il nu¬ 
mero e il nome degli alunni 
con le presenze, l’andamen¬ 
to scolastico e la situazione 
dei pagamenti. 

Primi con 
San Pellegrino 

Se l’agenzia di produzio¬ 
ne cinematografica Chiat/ 
Day ha vinto con Apple il 
31° festival del film pubblici¬ 
tario la Mercurio cinemato¬ 
grafica, sempre con Apple, 
ha vinto il premio come mi¬ 
glior fotografia alla rassegna 
del film pubblicitario italia¬ 
no con lo spot della San Pel¬ 
legrino Bitter (quello, per 
intendersi, dove appaiono 
gli sciatori con cappellone 
mentre scendono scodinzo¬ 
lando sulla neve fresca). 

«Sono stato io a volere un 
Apple», dice Giovanni Sias, 
presidente della società ci¬ 
nematografica, «quando, 


Giovanni Sias, presidente 
della Mercurio 
Cinematografica. 

tre anni fa, avevamo dimen¬ 
ticato di inviare a un cliente 
una fattura di 12 milioni.» 
Da allora l’Apple II voluto 
da Sias ne ha fatta di strada: 
dalle funzioni amministrati¬ 
ve per le quali era stato ac¬ 
quistato ha guadagnato il 
posto di insostituibile archi¬ 
vio di registi, di comparse, 
di videocassette, di spot 
pubblicitari di tutto il mon¬ 
do cui ogni giorno viene fat¬ 
to ricorso. 

«Quando un cliente ci 
chiede certe situazioni o 
particolari effetti», dice 
Sias, «noi attraverso il com¬ 
puter abbiamo subito l’elen¬ 
co di tutto quello che può 
contenere degli spunti». 

Quali sono le applicazioni 
più usate? «Prevalentemen¬ 
te il Pfs», dice ancora Sias, 
«un data base estremamente 
adattabile alle mie esigenze 
forse anche perché ormai, lo 
conosco fino alla più nasco¬ 
sta funzione. In questo mo¬ 
mento però sto subendo il 
fascino del Tre per te e del 
mouse». 

La Mercurio cinemato¬ 
grafica non ha scelto la stra¬ 
da della specializzazione, e 
si occupa un po’ di tutto. 
Una volta avuta l’idea e il 


tema dall’agenzia pubblici¬ 
taria, la società di Sias si 
preoccupa di trovare tutto, 
comparse, e registi compre¬ 
si. 



PER CAPIRE 
LA PAURA 


Per tre giorni, daini al 14 ot¬ 
tobre, studiosi ed esperti riu¬ 
niti a Milano, nella sala con¬ 
gressi della provincia, in via 
Corridoni 16, cercheremo 
una risposta alle paure mo¬ 
derne. Bernard Crik, uno dei 
massimi studiosi delle opere 
di George Orwell, farà il pun¬ 
to sulla «Questione Orwell e 
il problema della paura utopi¬ 
stica del 900». Poi Friederic 
Nashold presenterà una rela¬ 
zione sull’impatto dell’infor¬ 
matica nell’organizzazione 
sociale. 
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In edizione originale 
americana, ecco i libri 
che avete sempre 
cercato, dalla casa 
editrice che nel 
computer si è 
specializzata: la 
McGraw-Hill. 


Apple Backpack 

di Scot Kamins e Mitchell Waite. Tutto su 
come realizzare programmi user friendly, 
con controlli a prova d’errore. 

Lire 42.000. Abbonati ad 
Applicando 33.700 

Logo For The Apple// 

di H. Abelson. Tutto sul Logo, il nuovo 
linguaggio facile da usare, utilissimo agli 
adulti che vogliono insegnare ai bambini. 
Lire 47.000. Abbonati ad 
Applicando 37.500. 


68000 Assembly Language 
Programming 

di Gerry Kane, Doug Hawkins, Lance A. 
Leventhal. Presenta e spiega una per una 
tutte le istruzioni del 68000. 

Lire 50.000. Abbonati ad 
Applicando 40.000. 

Hands-On-Basic 

di Herbert Peckham. Esperienza pratica 
sul computer con attività guidate. 

Lire 57.900. Abbonati ad 
Applicando 46.300. 

Some Common Basic Programs 

di Lon Poole, Mary Borchers e David M. 
Castlewitz. 76 programmi che 
costituiscono un’antologia di listati 
finanziari, statistici e matematici. 

Lire 44.800. Abbonati ad 
Applicando 35.800. 


Apple III 

di Stanley M. Miastkowski. Tutte le 
informazioni necessarie per superare ogni 
problema d’uso dell’Apple III. 

Lire 47.300. Abbonati ad 
Applicando 37.800. 

VisiCalc Home and office 
Companion 

di David M. Castlewitz e Lawrence 
Chisausky. Modelli pronti per 
investimenti, pubblicità, vendite, 
personale inventari per il VisiCalc. 

Lire 41.700. Abbonati ad 
Applicando 33.400. 

Science and Engineering Programs 

di John Hellborn. 46 programmi per 
termodinamica, equazioni lineari, 
differenziali, analisi strutturale, serie di 
Fourier, ecc. 
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Lire 42.200. Abbonati ad 
Applicando 33.800. 

Applesoft Basic From 
The Ground Up 

di H. Mullish e D. Kruger. Per chi 
comincia, ecco una guida pratica 
all’Applesoft che conduce per mano fino 
alla programmazione strutturata. 

Lire 18.000. Abbonati ad 
Applicando 14.400. 

The Small Computer Connection 

di Neil L. Shapiro. Passo per passo, come 
collegare il vostro Apple al mondo esterno 
per accedere al le banche dati. 

Lire 47.400. Abbonati ad 
Applicando 37950. 

68000 Microprocessor Handbook 

di Gerry Kane. Conoscerei! 


microprocessore di Lisa e di Macintosh. 
Lire27.000. Abbonati ad 
Applicando 21.700. 

54 VisiCalc Models 

di Robert H. Flast. Investimenti, mutui, 
tasse, e un’altra trentina di problemi 
statistici e matematici risolti da questa 
collezione di modelli per VisiCalc. 

Lire 42.000. Abbonati ad 
Applicando 33.600. 

Guide to Apple software 

Una guida completa al software per Apple 
divisa in settanta settori applicativi con un 
elenco completo dei produttori e dei 
rivenditori. 

Lire 40.000. Abbonati ad 
Applicando 32.000. 


Inviatemi, senza aggravio di spese postali, i seguenti libri MCGraw-Hill: 

1 □ 54 VisiCalc Models □ Some Common Basic Programs 

□ The Small Computer Connection 

□ 68000 Microprocessor Handbook 

□ Apple Backpack 

□ Logo For The Apple// 

□ 68000 Assembly Language Programming 

□ Hands-On-Basic 


□ Apple I 

□ VisiCalc Home and office Companion 

□ Science and Engineering Programs 

□ Applesoft Basic From The ground Up 

□ Guide to Apple Software 


Cognome e nome..... 

Via.N.. Cap. 

Città.Provincia. 

□ Sono abbonato. □ Non sono abbonato. 

□ Allego assegno non trasferibile di L .sul CC postale N. 19740208 

intestato a Editronica Srl, Corso Monforte 39, 20122 Milano. 

□ Pago fin d’ora con la mia carta di credito Bankamericard N. 

scadenza.. 

Data.Firma. 

| □ Desidero fattura. Il mio C. Fisc./P.lva è:... 

'□ Desidero ricevere il catalogo completo dei libri disponibili. 


X 1 


Ritagliare e spedire a: Editronica Srl, Corso Monforte 39, 20122 Milano. 



















Tre per Jane 


Si chiama Jane, è prodot¬ 
to e distribuito negli Stati 
Uniti dalla Arktronics e rac¬ 
coglie in un unico disco un 
word processor (Janewrite), 
un data base (Janefile) e un 
foglio elettronico (Jane- 
calc), con la possibilità di 
usarli contemporaneamente 
e di interscambiare i dati tra 
i tre programmi permetten¬ 
do l’uso del mouse e del joy¬ 
stick. 
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rne, Rartin_ 


Mane Byrne. ...__ 

fìddress 1319 Forest Court_ 
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Jane viene venduto, in un 
pacchetto di quattro di¬ 
schetti colorati: azzurro è il 
demo del programma, nero 
il disco dati (contiene delle 
utility come l’opzione per 
cambiare gli slot della stam¬ 
pante o del mouse), giallo è 
il disco di aiuto, grigio è il 
disco sistema. 

Inserito il dischetto gri¬ 
gio, il programma visualizza 
nella prima riga dello scher¬ 
mo i vari strumenti a dispo¬ 
sizione e una manina con 
l’indice puntato aspetta le 
istruzioni tramite il mouse. 
Puntando la macchina per 
scrivere si richiama il word 
processor, la calcolatrice lo 
spreadsheet, l’archivio il da¬ 
tabase. 

Le forbici servono per ta¬ 
gliare, il barattolo di colla 
per incollare, la macchina 
fotografica per fotografare e 
copiare in un’altra pagina, il 
punto di domanda per le 
istruzioni, il lucchetto chiu¬ 
so per i file protetti (lock), 
quello aperto per quelli non 
protetti (unlock). 

C’è anche il cestino per 
gettare via i file, il dischetto 
per copiare o per inserire al¬ 
tri dischi, la stampante per 
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le opzioni di stampa e lo stop 
per uscire dal programma 
(vedere i due schermi qui 
sopra). 


Stampando 

s’impara 


È il programma in questo 
momento più atteso e ricer¬ 


cato sul mercato: si tratta 
del Gutenberg, il word pro¬ 
cessor che prende il nome di 
Johannes Gutenberg, l’in¬ 
ventore della stampa a ca¬ 
ratteri mobili attorno alla 
metà del XV secolo, che, ol¬ 
tre a raccogliere tutte le ca¬ 
ratteristiche dei migliori 
word processor (giustifica¬ 
zione, spaziatura proporzio¬ 
nale, personalizzazione del¬ 
le lettere, editing completo 


di cancellazione, sostituzio¬ 
ne e rimpiazzo dei testi 
etc.), si distingue per le ca¬ 
pacità grafiche e di stampa. 

Chi conosce già il pro¬ 
gramma MacWrite svilup¬ 
pato per il Macintosh trove¬ 
rà un equivalente nel Gu- 
temberg per la serie // e ///: è 
infatti possibile generare fi¬ 
gure e disegni, inserirle in 
qualsiasi parte del testo e ot¬ 
tenere l’esatta stampa su 
carta del video. 

Altra importante caratte¬ 
ristica del Gutenberg è quel¬ 
la di contemplare fino a 125 
caratteri definibili dall’uten¬ 
te: simboli tecnici, elementi 
grafici come, per esempio, i 
segni delle carte, alfabeti 
con caratteri particolari co¬ 
me il russo. 

A proposito della stampa, 
le stampanti compatibili con 
il Gutenberg sono le seguen¬ 
ti: Apple DMP, Centronics 
737 & 739, Epson MX-80 & 
MX-100, NEC PC-8023A- 
C, C.Itoh Prowriter, C.Itoh 
F-10, Qume Sprint 5/45 & 
9/45; le configurazioni possi¬ 
bili sono Apple II, II plus o 
//e con 48 o 64K e Apple III. 
È previsto l’impiego sia con 
uno che con due drive. 

Non è ancora noto chi di¬ 
stribuirà in Italia Guten¬ 
berg; per ora l’unico indiriz¬ 
zo di riferimento è quello 
dell’azienda che lo distribui¬ 
sce oltreoceano: è la Micro- 
mation Limited, 1 Yorkdale 
Road, Suite 406, Toronto, 
Canada M6A 3A1. Telefo¬ 
no (416) 781-6675. Il prezzo 
al pubblico è di circa 320 
dollari. 

































The Day Apple 

La Apple Computer, al 31 
festival del film pubblicita¬ 
rio di Cannes (oltre 1900 
spot iscritti e 17 paesi rap¬ 
presentati, era presente con 
4 produzioni: 1984 , Soloist, 
Basket ball e Breakfast , che 
hanno guadagnato oltre al 
Grand Prix, la massima ono¬ 
rificenza del festival, tre 
Leoni d’argento. Steve 
Jobs, d’altronde, aveva in¬ 
vestito molto in questi quat¬ 
tro spot affidandone la rea¬ 
lizzazione a registi del cali¬ 
bro di Ridley Scott e Adrian 



Lyne, autori, rispettivamen¬ 
te, di Biade Runner e di 
Flashdance. 

Il vincitore in assoluto è 
stato appunto 1984 diretto 
da Ridley Scott e prodotto 
dalla Fairbanks film, che ha 
battuto sul filo di lana lo 
spot della Pepsi-Cola. 

Carlo Broglia, titolare 
della Broucc e giurato italia¬ 
no a Cannes, ha così com¬ 
mentato il vincitore: «E’ un 
piccolo capolavoro che, 
prendendo spunto da Or¬ 
well, declina il concetto di 
liberazione offerta dal com¬ 
puter con un’ emotività in¬ 
tensissima». 

L’idea era quella di smi¬ 
tizzare le teorie di Orwell 
basandosi sul binomio effi¬ 
cienza-semplicità d’impie¬ 
go, caratteristiche fonda- 
mentali del Macintosh per il 
lancio del quale stato realiz¬ 
zato 1984. Ecco una breve 
scheda del film vincitore. 

Titolo: 1984 
Durata: 60 secondi 
Agenzia: Chiat/Day 
Casa di produzione: Fair¬ 
banks Films 
Regia: Ridley Scott 


Un gruppo di personaggi 
grigi e tristi si avvia verso 
una stanza piena di gente 
che guarda uno schermo do¬ 
ve vengono proiettate alcu¬ 
ne immagini del film 1984 
tratto dall’omonimo libro di 
Orwell. Una donna in ma¬ 
glietta e pantaloncini corre, 
inseguita. Stringe tra le ma¬ 
ni un grosso martello, entra 
nella stanza e lo lancia verso 
lo schermo per distruggerlo. 
C’é una grossa esplosione e 
la gente viene colpita da uno 
strano e forte vento. Com¬ 
pare una scritta che annun¬ 
cia che il 25 gennaio sarà 
presentato il Macintosh, la 
macchina che smentirà le 
teorie di Orwell 

È arrivato 
Supermac 

Se ne parlava già da qual¬ 
che tempo, ma non si pensa¬ 
va che sarebbe arrivato così 
presto: è il Macintosh con 
512 k di memoria Ram, ri- 
battezzato scherzosamente 
Supermac. 

Non esistono differenze 
estetiche dal modello a 128 k 
e nemmeno differenze ope¬ 
rative o di software. Quindi 
resta tutto come prima, sal¬ 
vo l’aver a disposizione una 
memoria quattro volte supe¬ 


riore. Non abbiamo ancora 
avuto la possibilità di prova¬ 
re su strada questo modello, 
pur avendolo visto e usato 
per una decina di minuti allo 
Smau. E le impressioni do¬ 
po questo primo contatto 
sono soprattutto di una 
maggior velocità operativa 
dovuta, pensiamo, al fatto 
che con maggior memoria a 
disposizione il nuovo Ma¬ 
cintosh non necessita più di 
continui spostamenti e sal¬ 
vataggi di dati dal dischetto 
alla memoria e viceversa. Il 
prezzo del nuovo Macintosh 
è di L. 5.990.350 Iva esclusa. 
Per tutti coloro che hanno 
appena comprato un Macin¬ 
tosh da 128k, e che a questo 
punto della lettura si stanno 
già mordendo le dita, ci so¬ 
no buone notizie. Infatti, se 
l’acquisto è stato effettuato 
prima del 30 settembre 1984 
potranno ottenere la modifi¬ 
ca a 512k sborsando L. 
1.500.000 Iva esclusa (prati¬ 
camente la differenza tra 
quanto hanno pagato e il 
prezzo del modello a 512k). 
Per chi acquista ora il Ma¬ 
cintosh da 128k, l’aggiorna¬ 
mento a 512k costerà L. 
2.000.000. Per questo gene¬ 
re di modifiche basterà ri¬ 
volgersi alla rete di rivendi¬ 
tori che sostituiranno diret¬ 
tamente la scheda logica. 
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MacPhone, un telefono e un sistema 
di gestione delle telefonate con il 
Macintosh prodotto dalla 
Intermatrix. 


Cinque \ 
a confronto 

Col modulatore demodulatore, i personal 
computer possono collegarsi con mainframe, 
banche dati o entrare nelle reti locali. 

Quali sono le differenze tra i vari modem in 
commercio? Che cosa è necessario per 
renderli operativi? E quanto costano? 

Ecco una guida completa. 


F orse pochi sanno che l’Apple è sta¬ 
to il primo e per lungo tempo l’uni¬ 
co personal computer a poter collegar¬ 
si con banche dati distanti anche mi¬ 
gliaia di chilometri. Già nel lontano, si 
fa per dire, 1980, infatti, per il vecchio 
e glorioso Apple II Europlus erano 
disponibili sia il software sia l’hardwa- 
re capaci di farlo rivaleggiare con i 
terminali stupidi che allora deteneva¬ 
no il monopolio nel settore. 

Il concetto di telecomunicazioni 
rappresenta un po’ l’antitesi dell’idea 
stessa di personal computer; il perso¬ 
nal infatti deve gran parte del proprio 
successo al fatto di aver fornito al sin¬ 
golo utente notevoli capacità di elabo¬ 
razione, svincolate dalle code e dai 
lunghi tempi di attesa che caratterizza¬ 
vano i centri di calcolo degli anni pas¬ 
sati. L’uscire dalla torre d’avorio del- 
r«è mio e lo uso quando voglio io» per 
immettersi in una rete e dover fare di 
nuovo i conti con gli eventuali affolla¬ 
menti e le esigenze di altri utenti po¬ 
trebbe sembrare in alcuni casi come un 
ritorno al triste passato. 

Ciò è però in gran parte inesatto. Se 
è vero, infatti, che in alcuni momenti 
le reti sono talmente sature di traffico 
da non essere utilizzabili, è altresì vero 
che la possibilità di collegarsi ad altre 
macchine, piccole o grandi, schiude al 
computer di casa una serie di possibili¬ 
tà operative interessantissime. A que¬ 
sto proposito basti pensare alle banche 
dati bibliografiche, che contengono 
centinaia di milioni di informazioni su 
qualsiasi argomento, al Videotel, alla 
posta elettronica, all’uso in time sha¬ 


ring delle possibilità di elaborazione e 
del software di grossi mainframes, op¬ 
pure, più prosaicamente, all’ufficio, a 
casa o allo scambio di dati e program¬ 
mi con amici e colleghi. 

L’Apple al telefono 

La maggior parte delle comunica¬ 
zioni a distanza tra computer grandi e 
piccoli viene effettuata tramite la nor¬ 
male linea telefonica. Non avendo 
corde vocali, però, un personal ha bi¬ 
sogno di qualcosa che lo metta in gra¬ 
do di impiegare una serie di apparec¬ 
chiature studiate appositamente per 
veicolare la voce degli esseri umani: 
questo qualcosa è il modem. 

Il modem, la cui sigla sta per MOdu- 
latore-DEModulatore, è un apparec¬ 
chio abbastanza semplice il cui compi¬ 
to è di trasformare i segnali digitali 
provenienti dal calcolatore in una se¬ 
rie di fischi di frequenza tale da poter 
viaggiare tranquillamente sulle linee 
telefoniche. All’altro capo della linea 
poi un altro modem demodula i fischi 
in arrivo, ritrasformandoli in segnali 
digitali che il secondo calcolatore po¬ 
trà interpretare e sfruttare. 

Dal fatto che il contatto tra i due 
computer avvenga tramite il modem 
proviene tra l’altro un importantissi¬ 
mo vantaggio: fintantoché si usa lo 
stesso protocollo di comunicazione 
anche macchine diversissime tra loro 
per dimensioni e caratteristiche posso¬ 
no dialogare e scambiarsi dati, elimi¬ 
nando qualsiasi problema di incompa¬ 
tibilità. L’accoppiamento tra il mo- 
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dem e la linea telefonica può essere 
effettuato in due modi, acusticamente 
o elettromagneticamente. Nell’accop¬ 
piamento elettromagnetico, il mo¬ 
dem, quando è in funzione, bypassa 
tramite un commutatore il telefono al 
quale è collegato e si inserisce diretta- 
mente sulla linea telefonica. Nell’ac¬ 
coppiamento acustico, invece, la cor¬ 
netta del telefono è posta in un’apposi¬ 
ta culla di gomma, in corrispondenza 
di un piccolo altoparlante e di un mi¬ 
crofono che consentono lo scambio 
dei segnali acustici. 

Per essere montato, quindi, un mo¬ 
dem ad accoppiamento elettromagne¬ 
tico necessita di un intervento sulla 
linea, intervento che può essere effet¬ 
tuato solamente dai tecnici SIP, men¬ 
tre l’accoppiatore acustico ha il van¬ 
taggio di essere più leggero e più mobi¬ 
le, non richiedendo installazioni per¬ 
manenti. Rispetto a quello acustico, 
l’accoppiamento elettromagnetico, 
essendo insensibile al rumore ambien¬ 
te, fornisce però un segnale più pulito 
ed esente da disturbi, nonché la possi¬ 
bilità di trasmettere dati a una maggio¬ 
re velocità rispetto agli accoppiatori. 

Baud, originate & duplex 

Eternamente, tutti i modem ap¬ 
paiono come dei contenitori dotati di 
interruttori, spie e, nel caso dell’ac¬ 
coppiamento acustico, hanno l’aspet¬ 
to di una culla in gomma in cui inserire 
la cornetta del telefono. Il parametro 
forse più importante nell’impiego di 
un modem per telecomunicare è rap¬ 
presentato dalla velocità di trasmissio¬ 
ne dati. Questa velocità si misura in 
baud, ovvero in bit al secondo. 

Un modem a 300 baud trasmetterà e 
riceverà quindi fino a un massimo di 30 
caratteri al secondo, mentre una mac¬ 
china a 9600 baud sarà in grado di 
inviare e accettare fino a 960 caratteri 
al secondo. Oltre al costo dell’hardwa- 
re, la velocità di trasmissione rappre¬ 
senta anche un importante fattore nel¬ 
la scelta del tipo di accoppiamento che 
si intende usare. 

Un accoppiatore acustico, infatti, 
può arrivare fino a 1200 baud, che è 
anche il limite massimo di velocità im¬ 
piegabile su una normale linea com¬ 
mutata, cioè aperta al pubblico. Per 
lavorare con velocità più alte, quasi 
mai però necessarie quando si lavora 
con un personal, bisogna dotarsi di un 
modem SIP e di una linea dedicata, 
cioè fornita in gestione dalla SIP a un 
solo utente, a un prezzo piuttosto rile¬ 
vante. Quasi tutti i modem sono inol¬ 
tre in grado di funzionare sia in full 
duplex sia in half duplex. Senza ad¬ 


dentrarsi in complessi dettagli tecnici, 
si può dire che questo tipo di commu¬ 
tazione è necessario se si intende lavo¬ 
rare sia con computer interpellabili di¬ 
rettamente via telefono (half duplex) 
sia con computer collegati in rete (full 
duplex). Un’altra possibilità operativa 
presente sulla quasi totalità dei mo¬ 
dem e degli accoppiatori è la scelta del 
modo di funzionamento, che può esse¬ 
re in chiamata (originate) o in risposta 
a una chiamata (answer). 

La differenza tra i due sistemi di 
funzionamento è che nel modo «an¬ 
swer» la macchina genera anche una 
portante, che viene poi modulata dai 
toni contenenti le informazioni. 

Tutti gli host aperti al pubblico pos¬ 


siedono un modem settato su answer; 
se si intende invece effettuare un colle¬ 
gamento punto a punto tra due perso¬ 
nal, è invece necessario che almeno 
uno dei due mode sia dotato di questa 
possibilità. 

Magnetico o acustico? 

La scelta tra le numerose marche e 
modelli presenti sul mercato deve es¬ 
sere effettuata, per non incorrere in 
costosi errori, con una certa attenzio¬ 
ne, privilegiando alcune caratteristi¬ 
che (compattezza, affidabilità, veloci¬ 
tà, costo contenuto) in funzione del¬ 
l’uso che se ne intende fare. 

Chi desideri un’alta velocità di tra- 
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Velocità (band): 300 
(A211 e A311), 1200 
(J1234). Prezzo: $ 550 
(A211) $ 650 (A311) $ 
950 (J1234). Distributo¬ 
re: Eitron, viale Europa 
68, Monpiano (BS), tele¬ 
fono 030/396210 


< 
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Velocità (band): 300 o 
1 200. Prezzo : L. 
700.000. Distributore: 
Mactronics, via Jenner 
40/A, Milano, telefono 
02/6882141. 
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Velocità (band): 300. 
Prezzo L. 350.000. Di¬ 
stributore: Teleprinter, 
via M. Dal Re 25, Milano, 
telefono 02/322328. 


a 



Velocità (band): 300. 
Prezzo: L. 300.000. Di¬ 
stributore: Segi, via Ti- 
mavo 12, Milano, telefo¬ 
no 02/6709136. 


< 

o 


< 

> 



Velocità (band): 300. 
Prezzo: $ 450. Distribu¬ 
tore: Telcom, via Civitali 
75, Milano, telefono 
02/4047648. 
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Applicando ha un futuro. 


Applicando cresce. Cresce perché ha tanti programmi 
da pubblicare e tante informazioni da dare. 
E diventa MENSILE. Sì, tutti i mesi Applicando ti porta 
in ufficio, a casa, a scuola tante, tantissime idee utili 
per trarre il meglio dal tuo Apple. Per non perderti né un 
programma, né una novità, né una informazione, che 
potrebbe esserti indispensabile, abbonati. Riceverai 
Applicando tutti i mesi e inoltre avrai in regalo 
Le Pagine del Software (del valore di 12.000 lire) oppure, 
se scegli la formula senza dono, risparmierai 
10.000 lire sul costo dell’abbonamento. 
A tutti comunque la Facility Card Applicard. 


ooo 







applicando 

LE RAGINE 
DEL 

SOFTWARE 


1 



o 




□ Allego assegno non trasferibile di lire. 
intestato a EDITRONICA srl 


n Allego ricevuta di versamento di lire. 

sul c/c postale N. 19740208 intestato a Editronica 
Srl, Corso Monforte 39, 20122 Milano. 

□ Pago fin d’ora lire.con la mia carta 

di credito BankAmericard W 

N...scad.<A) 

autorizzando la Banca d’America e d’Italia ad ad¬ 
debitare l’importo sul mio conto BankAmericard. 


/ Cognome 

Nome. 

Via. 


□ Inviatemi dieci numeri di Applicando e la carta 
Applicard a 40.000 lire. 


Desidero che il mio abbonamento abbia inizio dal 
numero. 


□ Inviatemi i seguenti arretrati a 7.000 lire cadau¬ 
no (per l’elenco degli arretrati disponibili vedi a 
pagina 17) 


Sì, mi abbono! 


□ Inviatemi dieci numeri di Applicando, Le Pagine 
del Software e la carta Applicard a 50.000 lire. 
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/ CAP.Città 


Prov 


\ 


Compila e spedisci a Editronica sri, 
C.so Monforte 39, 20122 Milano 
Oppure abbonati nei migliori 
Computer Shop. 


Data.Firma. 

□ Desidero fattura. Il mio Cod.Fisc./Part.lVAè 
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smissione, unita a un’ottima affidabili¬ 
tà, dovrebbe orientarsi su un accop¬ 
piatore di alta qualità o, ancor meglio, 
su un modem SIP, offerto a noleggio 
completo di contratto di assitenza, 
mentre per operazioni non frequenti e 
in ambiente domestico, privo quindi 
dei rumori ambientali che sono i peg¬ 
giori nemici del corretto funzionamen¬ 
to di un accoppiatore acustico, è di 
solito sufficiente uno dei modelli più 
economici. 

Modem, ecco quali 

Ecco un breve elenco dei modelli di 
modem attualmente più diffusi in 
Italia. 

• Modem SIP. I modem forniti dalla 
SIP Sistemi di utente sono costruiti da 
numerose Case e hanno velocità che 
vanno da 300 a 9600 baud. Il loro no¬ 
leggio costa a partire da 14.000 lire al 
mese. Quasi tutti i modelli SIP possie¬ 
dono sia la commutazione half/full du¬ 
plex sia quella originate/answer. Ulte¬ 
riori informazioni possono essere ri¬ 
chieste telefonando al 187. 

• Anderson Jacobson. Tra i primi ap¬ 
parecchi ad apparire sul mercato, gli 
Anderson Jacobson godono tra gli ad¬ 
detti ai lavori la fama di Mercedes de¬ 
gli accoppiatori, per il loro prezzo e la 
loro affidabilità. 

Seppure non modernissimi come 
design, hanno il vantaggio di essere 
praticamente indistruttibili in condi¬ 
zioni normali di impiego e di essere tra 
i meno sensibili al rumore ambiente. 
Tutti gli accoppiatori di questa casa 
presentano la commutazione half/full 
duplex. 

Il modello A211 a 300 baud costa 
l’equivalente di 550 dollari, il modello 
A311 (sempre a 300 baud ma con l’op¬ 
zione answer) ne costa 650, mentre il 
J1234, a 1200 baud, arriva a 950. 

Gli accoppiatori Anderson Jacob¬ 
son sono distribuiti in Italia dalla El- 
tron di Brescia (viale Europa 68, 
20560 Mompiano, telefono 030/ 
396210). 

• Sendata serie 700. Venduti dalla 
Mactronics (viale Jenner 40/a, Mila¬ 
no, telefono 02/6882141), questi ac¬ 
coppiatori australiani sono quanto di 
più piccolo e compatto offra il merca¬ 
to, ma le loro ridotte dimensioni non 
influiscono assolutamente sulla capa¬ 
cità operativa. Tutti i modelli posseg¬ 
gono sia l’opzione originate sia l’op¬ 
zione answer, insieme allo switching 
half/full duplex e hanno velocità che 
variano dai 300 ai 1200 baud. Il loro 
prezzo si aggira sulle 700.000 lire. 

• Novation CAT. Fabbricato negli Sta¬ 
ti Uniti e ottenibile tramite la Telcom 


(via Civitali 75, Milano, telefono 02/ 
4047648), il CAT è forse l’accoppiato¬ 
re acustico più diffuso in Italia. 

Dotato sia di originate sia di answer 
e funzionante sia in half sia in full du¬ 
plex questo apparecchio costa l’equi¬ 
valente di 450 dollari. 

• Epson CX21. Dopo aver cominciato 
con le stampanti e aver proseguito con 
i personal, la Epson ha recentemente 
introdotto sul mercato anche questo 
accoppiatore acustico, dal design piut¬ 
tosto attraente e dal prezzo molto inte¬ 
ressante di 380.000 lire. Il CX21 dispo¬ 
ne sia di originate sia di answer e, par¬ 
ticolarità unica che lo rende adattissi¬ 
mo all’impiego in collegamento con i 
calcolatori portatili, è in grado di fun¬ 


zionare anche senza connessione alla 
rete, tramite un’apposita batteria rica¬ 
ricabile al nikel cadmio della durata di 
quattro ore. Il CX21, settabile sia in 
half sia un full duplex, è venduto dalla 
SEGI di Milano (via Timavo 12, tele¬ 
fono 02/6709136). 

• Livermore Star. Con un prezzo di 
350.000 lire, lo Star, disponibile pres¬ 
so la Teleprinter di Milano (via Mar¬ 
cantonio Dal Re 25, telefono 02/ 
322328), rappresenta la periferica per 
trasmissioni dati in assoluto più econo¬ 
mica presente sul mercato. Nonostan¬ 
te il prezzo ridotto, però, questo appa¬ 
recchio è in uso già da alcuni anni in 
numerosi centri di trasmissione dati, 
dove ha sempre dato buona prova di 


sé. Come quasi tutti i colleghi, può 
funzionare sia in originate sia in an¬ 
swer. E presente anche l’opzione half/ 
full duplex. 

Come collegarsi all’Apple 

Tutti i modem visti sinora possie¬ 
dono un ingresso seriale di tipo RS 
232C standard, fatto che consente a 
tutti i modelli della serie Apple un col- 
legamento semplice e senza problemi, 
pur se le modalità di interfacciamento 
variano da macchina a macchina. 

L’hardware necessario per effettua¬ 
re la connessione con un modem o con 
un accoppiatore acustico è il seguente: 
Apple II Europlus: 


Cavo RS 232 e Communication Card. 
Apple Ile 

Cavo e interfaccia seriale, commu¬ 
tabile internamente su modem o su 
stampante posizionando diversamen¬ 
te un integrato. 

Apple Ile: 

Cavo RS 232C, in quanto l’interfac¬ 
cia e l’uscita modem sono già compre¬ 
se nell’hardware. 

Apple III: 

Cavo e Communication Card. 

Lisa e Macintosh: 

Come per il Ile, basta un semplice 
cavo, le interfacce (due nel caso del 
Lisa) sono già comprese nella mac¬ 
china. 

Marco Anelli 


Quando il modem va in banca 

Tra le novità presentate dalla Apple e dai suoi rivenditori allo Smau 
particolare interesse è stato riservato dal pubblico alle nuove proposte 
italiane nel settore delle banche dati. Soprattutto le dimostrazioni di 
collegamento con tre sistemi (host) made in Italy. Il primo, battezzato 
Mac Quin, è un multiarchivio di 18 quotidiani di interesse nazionale che 
tratta un volume medio di 200 articoli giornalieri per sette giorni alla 
settimana, a partire dal gennaio 1981. E’ una banca dati del gruppo Sipe 
Optimation (via Silvio D’Amico, 40 Roma); gestito da un gruppo di 
giornalisti tramite il Centro Machiavelli (via Clerici 10, Milano); con la 
collaborazione del computer shop Information Technology (via dei Bossi 
7, Milano). Il costo del collegamento si aggira intorno alle 100 mila lire per 
ogni ora di consultazione. 

Il secondo è l’ultima versione aggiornata e finalmente accessibile delle 
Pagine gialle elettroniche, il servizio informativo telematico della Seat. Si 
tratta di un archivio di oltre 700 mila operatori economici, dislocati in tutti 
i comuni italiani, di cui è possibile conoscere le informazioni essenziali 
quali indirizzo, attività ecc., più alcune notizie di carattere tecnico-com¬ 
merciale fornite dallo stesso operatore. Per informazioni: Casella Postale 
155, 00040 Pomezia, telefono 06/91197700. 

Terza novità, il servizio di posta elettronica della Sst (Servizi e Sistemi 
Telematici, via Camperio 10, Milano), una vera segreteria informatizzata 
chiamata Tina International. Il canone mensile è di 165 mila lire e consen¬ 
te di inviare e ricevere messaggi, dati, lettere a un qualsiasi personal 
associato in ogni parte del mondo. 
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Ma anche un passato. 

Applicando è una miniera di idee, di programmi, di articoli, 
di suggerimenti. Perderne uno è un peccato. Le scorte sono limitate e il 
numero 2 è già esaurito. Affrettati a spedire il tagliando di pagina 15. 



1 - Maggio-Giugno 1983 - Lire 
7.000 - Una guida per utilizzare il WPL e 
per rendere automatico il lavoro d’uffi¬ 
cio • Il VisiSchedule, un programma 
per ottimizzare i tempi di lavorazione • 
Statistiche • Come aumentare la capa¬ 
cità dei dischetti • Tutti gli uomini di 
Dossier • Un utile esercizio di ortogra¬ 
fia e di tastiera • Analizzare entrate e 
uscite in funzione del punto di pareggio 

• L’Apple// diventa un orologio-sveglia 

• Tu sei il guardiano del castello e hai 
venticinque colpi da sparare contro gli 
intrusi • Un calendario perpetuo • Di¬ 
segniamo sullo schermo • Come tra¬ 
sformare la tastiera di un Apple/// in 
quella di un pianoforte • Caccia al 
tesoro, a nuoto, fra le insidie di tronchi 
galleggianti • Tabella di compatibilità 
dei programmi APPLE//e Apple II. 



6 - Marzo-Aprile 1984 - Lire 7.000 - 
Tre per te: un unico software per data¬ 
base, word-processor e spreadsheet • 
Anteprima di Apple tic: c come comple¬ 
to, compatto, compatibile, ma anche 
portatile, leggero, versatile • Titoli di 
stato, cartelle fondiarie, obbligazioni: 
l’Apple vi aiuta a difendere i vostri ri¬ 
sparmi • Un mostro tira l’altro: riusci¬ 
rete a mangiarli tutti? • Stress: un nuo¬ 
vo gioco per vincere lo stress • Memo¬ 
ria riga per riga: come localizzare alcune 
perti di un programma velocemente con 
il Linefinder • Seconda puntata del Pa¬ 
scal: cos'e' un compilatore? E un com¬ 
pilatore in formato libero? • L’Apple- 
soft per semplificare l’impaccamento 
dei record e il recupero delle informa¬ 
zioni dal dischetto • Grafici a passeg¬ 
gio: il dump della pagina grafica da 
Apple // a una stampante semigrafica. 





7 - Maggio-Giugno 1984 - Lire 
7.000 - ProDos: il nuovo sistema opera¬ 
tivo con nuovi comandi e con la possi¬ 
bilità’ di usare il ProFile e il Mouse • 
Computer e pennello: Apple per realiz¬ 
zare su schermo capolavori di pittura • 
Topolino aiuta i bambini a riconoscere i 
numeri • Programmi top-secret: impe¬ 
dite ai curiosi di ficcare il naso nei vostri 
programmi • Una cassetta di salvatag¬ 
gio per registrare su nastro i vostri pro¬ 
grammi piu’ importanti • Grafica e ani¬ 
mazione: sesta puntata dell’Applesoft 
per svelarvi tutti i segreti della grafica • 
Tipi e variabili: terza puntata del Pascal 
• Diventa un disk-jockey infallibile: 
l’Apple tiene in ordine l'archivio dei tuoi 
dischi • AIUTO: un programma che vi 
consente di trovare subito gli errori di 
battitura e di correggerli tutti insieme. 



3 - Settembre/Ottobre 1983 - Lire 
7.000 - Un programma di Data Base 
accessibile a tutti • Ecco Logo in italia¬ 
no • Una scheda e una telecamera e il 
tuo Apple vede • Etichette spiritose o 
bizzarre, di lavoro o di ogni genere • 
Piccoli editori, circoli, club e associa¬ 
zioni possono raggiungere soci e abbo¬ 
nati facilmente, servendosi di questo 
programma dal costo contenuto • Equo 
canone col VisiCalc per padroni o in¬ 
quilini • Una routine e la Epson M-80 
stampa i grafici • Seconda puntata del 
corso di Basic • Poche domande sullo 
schermo, per rispondere alle quali basta 
una segretaria, ed ecco pronto in cinque 
minuti un documento di più pagine per¬ 
sonalizzato scegliendo fra decine di op¬ 
zioni diverse semplicemente con un uso 
accorto del WPL • Dadi e punti (gioco). 



8 - Luglio-Agosto-Settembre 1984 

- Lire 7.000 - 37 nuovi programmi per 
Mac: tutte le novità’ del NCC di Las 
Vegas • Personalizza i messeggi d’er¬ 
rore dei tuoi programmi • Appliscuola: 
una nuova serie di articoli e programmi 
studiati per la scuola da Enzo Tonti, 
docente universitario • Le Mans in pol¬ 
trona: partecipate alla corsa automobili¬ 
stica piu’ famosa del mondo • Due dita 
sono sufficienti per scrivere con il com¬ 
puter, ma con dieci... • Un computer 
per segretario: tutti i trucchi delle mi¬ 
gliori segretarie e come realizzarli con il 
computer • Trasformate il vostro Apple 
in un melodioso organo • La struttura 
dei dati: quarta puntata del corso di 
Pascal • La scelta della stampante e’ 
importante: se l'accopiata col computer 
e’ vincente... • Scritte lampeggianti, 
caratteri che scorrono e altri effetti con 
l’Applesoft. 



4 - Novembre-Dicembre 1983 - Li¬ 
re 7.000 - Tre schede, una tastiera e un 
po’ di software: e il computer diventa 
un’intera filarmonica digitale • Piano¬ 
forte, organo e violino in Pascal • Per 
imparare a leggere più velocemente (e 
per fare esercizio d’inglese) • Elogio 
del VisiDex • Grazie Lisa: cos’è e a chi 
può servire il rivoluzionario personal 
computer della Apple • Rompiquindici: 
quindici pedine bianche da mettere nel 
giusto ordine • Per chi ha i dischetti del 
Sistema Pascal, ecco una rassegna del¬ 
le possibilità offerte e dei comandi a 
disposizione • Il programma Dedalus 
• Terza puntata della guida Basic • 
Guida ragionata dei software in com¬ 
mercio per la gestione condominiale • 
Una numeric keypad fatta solo di soft¬ 
ware. 



5 - Gennaio-Febbraio 1984 - Lire 
7.000 - La tecnologia del mouse appli¬ 
cata ad Apple// e Apple/// • Mclntosh, 
piccolo, maneggevole, portatile • In 
memoria i vostri impegni di un anno 
intero • Un programma per la contabili¬ 
ta’ semplificata • Un gioco per due, nel 
quale si danno battaglia cannoni di 
grosso calibro • Investor in portafoglio: 
uno dei migliori programmi da digitare 
(oppure su dischetto a sole settantamila 
lire) fornisce in tempo reale il quadro 
esatto di come vanno i propri investi¬ 
menti finanziari. Molto semplice come 
struttura, Investor e’ l’ideale per la ge¬ 
stione del proprio portafoglio titoli • 
Quarta puntata del corso di Basic • Il 
famoso gioco delle freccette in versione 
elettronica per Apple • Prima puntata di 
un facile corso di Pascal. 
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Compila e spedisci subito il tagliando 
della pagina 15 a: Editronica - 
Ufficio arretrati di Applicando 
Corso Monforte 39, 20122 Milano 




































STUDIO PESCINI MILANO 


ENCODEX HARDWARE 

SERVICE 



ASSISTENZA TECNICA IN LOCO 


ENCODEX 

è ASSISTENZA TECNICA per il Vostro 
Personal Computer APPLE 

ENCODEX 

è la prima società indipendente di 
ASSISTENZA TECNICA in Italia 

ENCODEX 

è l’unica organizzazione autorizzata 
da APPLE per ^ASSISTENZA TECNICA 
IN LOCO su tutto il territorio nazionale 

ENCODEX 

Vi propone il servizio IN LOCO 
su tutto il territorio nazionale 
con tempestività d’intervento 
ovunque esso venga richiesto 

ENCODEX 

è ASSISTENZA TELEFONICA: 
il servizio permette di risolvere le Vostre 
difficoltà tecniche anche al telefono 

ENCODEX 

è ASSISTENZA TECNICA 24 ORE: 
la nostra segreteria telefonica è operativa 
per 24 ore sette giorni su sette. 

E. H.S. 

encodex hardware Service s.r.l. 

sede: milano, via padova, n. 38 

tei. 2871612 rie. aut. 5 linee 
telex: encsat -1 322268 



^ppphs 

assistenza autorizzata 
in loco 











































































































«o# Ma sono dawero compatibili? Che cosa si cela dietro questa 
Darolina magica troppo spesso usata a proposito e a sproposito? 

Applicando ha provato sul nuovo Ile i programmi più 
comuni già presenti sul mercato per la serie II scoprendo che... 


Che cosa c’é 
d’incompatibile 



C come compatto, c come comple¬ 
to, c come compatibile. In queste 
tre parole, la Apple, durante la cam¬ 
pagna pubblicitaria, ha sintetizzato 
tutte le doti del //c, versione ridotta in 
dimensioni, ma maggiorata in presta¬ 
zioni, del //e. 

Ma fino a che punto le due macchine 
sono dawero compatibili? Chi ha in¬ 
vestito in programmi per il //e potrà 
utilizzarli senza problemi sul //c? Pri¬ 
ma di rispondere a queste domande, è 
opportuno dare una rapida occhiata 
alla struttura interna delle due macchi¬ 
ne, più precisamente all’interno dei 
due sistemi. Il //c ha raccolto e com¬ 
presso tutta la tecnologia del //e, sche¬ 
de di espansione e interfacce compre¬ 
se. La memoria Rom è per entrambi i 
modelli di 16 kb, la Ram di base è di 


128 kb per il //c, limite raggiungibile 
dal //e con la scheda di espansione. I 
sistemi operativi sono identici: (DOS 
3.3, Pascal e ProDOS) e anche i lin¬ 
guaggi usati sono gli stessi: Applesoft 
Basic, Pascal e Logo, mentre una pic¬ 
cola differenza esiste per l’Assembler, 
6502 per il //e e 65C02 per il //c. È 
proprio questo l’unico punto d’incom¬ 
patibilità tra i due sistemi: il micropro¬ 
cessore. 

//c e //e adottano un modello a 16 bit 
con la stessa sigla, 6502, ma natural¬ 
mente con una c in più per il portatile. 
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Una variazione per stare al passo con 
le innovazioni tecniche, ma anche una 
piccola limitazione all’impiego dei 
programmi già in commercio. 

E allora? Ancora una volta viene 
spacciata una macchina come compa¬ 
tibile solo perché le istruzioni di pro¬ 
grammazione sono le stesse? Non è 
davvero questo il caso della serie //. I 
problemi di incompatibilità sono infat¬ 
ti limitati a pochi programmi. Per fare 
un esempio concreto si può dire che si 
sta ripetendo quanto avvenne al mo¬ 
mento del lancio sul mercato del //e 
che, in pratica, andava a sostituire 
l’Apple II (vedere Applicando n. 1, 
maggio-giugno 1983). 

Ciononostante, proprio per togliere 
qualsiasi dubbio sulla compatibilità di 
programmi e periferiche tra //c e //e, 
Applicando pubblica in queste pagine 
le tabelle dei prodotti software (tabel¬ 
la di pag. 20) e hardware (tabella di 
pag. 21) più comuni in commercio. 

Come si leggono 
le tabelle 

Per ogni applicazione hardware o soft¬ 
ware viene precisato il settore merceo¬ 
logico di utilizzo; il prezzo; quali fun¬ 
zionano solo con il //e; quali offrono 
una compatibilità completa con il //c; 
quali presentano piccole differenze e 
quali sono disponibili già da ora in una 
nuova versione per il //c. 

L’hardware 

La suddivisione è fatta in base alla 
tipologia del prodotto elencando i di¬ 
versi modelli con i rispettivi produtto¬ 
ri. Le colonne relative alle prove di 


compatibilità sono tre: la prima limita 
l’impiego al solo //e; la X indica la 
totale incompatibilità; la C indica un 
possibile interfacciamento al Ile con 
particolari modifiche. La seconda co¬ 
lonna raccoglie la completa compati- 
blità del prodotto. La terza i modelli 


nuovi o rivisti espressamente per il 
nuovo portatile. 

Il software 

Nella tabella delle applicazioni più 
comuni di software vengono pubblica¬ 
ti il nome del prodotto, il produttore e 

















il settore applicativo suddiviso nei set¬ 
tori education (E), comunicazioni 
(C), giochi (G), management (M) e 
Utilities (U). 

A lato delle caratteristiche del pro¬ 
dotto i risultati dell’esame di compati¬ 
bilità. La prima colonna raccoglie i 
prodotti che girano solo sul //e, la se¬ 
conda segnala la perfetta compatibili¬ 
tà con il //c, nella terza sono indicati i 
programmi compatibili che presenta¬ 
no però qualche differenza marginale, 
nella quarta colonna quelli invece 
nuovi o rivisti per il //c. 

I responsi sono indicati con una X in 
tutte le colonne, fatta eccezione per la 
terza, dove vengono segnalati i pro¬ 
blemi di incompatibilità: la dicitura 80 
indica che il programma risulta com¬ 
patibile solo in caso che il //e abbia la 
scheda di espansione a 80 colonne; la 
M indica che il programma gira perfet¬ 
tamente sul //c fatta eccezione per le 
scritte in inverse che appaiono come 
simboli grafici; la D indica la docu¬ 
mentazione differente; la G significa 
che viene stampata e gira perfetta¬ 
mente la parte di testo ma non quella 
grafica; la F vuol dire che il program¬ 
ma gira solo dopo aver formattato il 
disco dati con il Pascal Disk Formatter 
neH’Utilities Disk del /le; e infine P 
significa che se si incontrano problemi 
nel settare la stampante, si può porre 
facile rimedio con l’utilities disk del 
Ile. 

Un ultimo appunto: il carattere # 
nella colonna dei programmi nuovi o 
rivisti per il He indica i prodotti ai quali 
viene applicato il bollino Works on 
Apple Ile per garantire l’effettivo stu¬ 
dio di quel software in base alle carat¬ 
teristiche proprie della nuova macchi¬ 
na. 

Mario Magnani 



SOFTWARE 



Versione per il//C 


Piccole differenze 




Compatibile 






Solo //e 





Prezzo x 1.000 







Settore applicativo 







Programma 

Produttore 







Access //e 

Apple 

c 

180 


X 



Adventure black jack 

Muse 

9 

nc 


X 



Apple access// 

Apple 

c 

150 




X 

Apple fortran 

Apple 

u 

360 



80 


Apple grapich // 

Apple 

m 

nc 


X 



Apple logo 

Apple 

u 

320 


X 



Apple logo // 

Apple 

u 

190 




X 

Apple panie 

Broderbund 

9 

65 


X 



Apple pascal //, 1.1 

Apple 

u 

450 



f 


Apple pilot 

Apple 

e 

nc 


X 



Apple super-pilot 

Apple 

e 

360 


X 



Apple super-pilot log 

Apple 

e 

nc 

X 




Apple writer // 

Apple 

m 

nc 



p 


Apple writer // (prodos) 

Apple 

m 

nc 




X 

Apple writer //e 

Apple 

m 

310 

X 


m 


Apple// business, graphics 

Apple 

m 

320 


X 



Appleworks 

Apple 

m 

420 




X 

Cannonball blitz 

Sierra on-line 

9 

76 


X 



Castle wolfenstein 

Muse 

9 

65 


X 



Chess 

Odesta 

9 

150 


X 



Cfs 

Cominfor 

m 

198 




X 

Co-pilot 

Apple 

e 

65 


X 



Cocco 

Antek 

m 

490 


X 



Criticai mass 

Sirius software 

9 

86 


X 



Crypto cube 

Designware 

9 

86 


X 



Dos tool kit 

Apple 

u 

nc 


X 



Dos tool kit applesoft 

Apple 

u 

150 



d 


Dos tool kit/6502 assembler 

Apple 

u 

nc 



m 


Flight simulator 

Sublogic 

9 

75 


X 



Flight simulator II 

Sublogic 

9 

120 


X 



Frogger 

Sierra on-line 

9 

nc 

X 




Frogger 

Sierra on-line 

9 

nc 




X 

Improve your English 

Dida. El 

e 

400 




X 

Ingegneria civile 

Softing 

m 

100 


X 



Multiplan (1984) 

Microsoft 

m 

410 




X 

Multiplan 1.06 

Microsoft 

m 

560 

X 




Npl//e 

Apple 

u 

1000 



80 


Pardo // 

Cominfor 

m 

nc 



80 


Pascal// 1.2 

Apple 

u 

nc 


X 



Pfs.access 

Software publishing 

c 

147 





Pfs.file 

Software publishing 

m 

260 



. m 


Pfs:file 

Software publishing 

m 

260 




X 

Pfs.graph 

Software publishing 

m 

260 



m 


Pfs.graph 

Software publishing 

m 

260 




X 

Pfs:report 

Software publishing 

m 

260 


X 



Pfs.report 

Software publishing 

m 

260 




# 

Pfs.write 

Software publishing 

m 

260 


X 



Pfs.write 

Software publishing 

m 

260 




# 

Prodos 1.0 aplsoft samp. 

Apple 

u 

100 


X 



Prodos 1.0 basic prog. 

Apple 

u 

60 



d 


• Prodos 1.0 dev sys/toolkit 

Apple 

u 

90 



d 


Quick file //e 

Apple 

m 

180 



f 


Sargon II 

Hayden software 

9 

70 


X 



Screen writer II 

Sierra on-line 

m 

nc 




# 

Screen writer II 

Sierra on-line 

m 

270 

X 




Script II 

Apple 

m 

nc 


X 



Senior analyst 

Apple 

m 

nc 


X 



Shell games 

Apple 

9 

nc 


X 



' Stickybear shapes 

Xerox education 

e 

nc 

X 




Stickybear shapes (84) 

Xerox education 

e 

nc 




X 

Tic tac show 

Computer adv.ideas 

e 

nc 


X 



Visicalc 

Visicorp 

m 

550 



m 


Visicalc adv.vers. 

Software arts 

m 

nc 




# 

Visicalc//e adv.vers. 

Visicorp 

m 

620 



m 


Visidex 1.1 

Visicorp 

m 

536 

X 




Visitile 1.1 

Visicorp 

m 

536 

X 




Visiplot 

Visicorp 

m 

430 

X 




Visischedule 1.1 

Visicorp 

m 

640 


X 



Visiterm 1.2 

Visicorp 

m 

215 


X 



Visitrend 1.1 

Visicorp 

m 

640 





Zaxxon 

Datasoft 

9 

86 


X 



Zork 1 

Infocom 

9 

80 


X 



Zork II 

Infocom 

9 

80 


X 



Zork III 

Infocom 

9 

80 


X 




























Una strepitosa offerta Apple da prendere al volo: da oggi 
fino al 2000 scatta l’operazione Usciamo insieme, che consente 
di provare per un intero weekend un Macintosh o un Apple Ile. 
E se usi il tagliando di Applicando... 


Un computer in regalo 
per due giorni 


N on si può proprio dire di no a una proposta così. È la 
Apple che la fa attraverso i suoi rivenditori. Un wee¬ 
kend in compagnia di Apple //c oppure di Macintosh. 
Come? Basta andare dai rivenditori Apple e potrai avere 
per due giorni a casa tua un computer completo di pro¬ 
grammi. Saranno due giorni di magnifiche scoperte che ti 
consentiranno di avvicinarti in maniera' pratica al compu¬ 
ter. Se vuoi, potrai anche avere il computer per due giorni 
durante la settimana. 

Comunque sia, un weekend o due giorni feriali con il 
computer vengono a costare molto meno di una gita al 
mare o al lago, perché disporre di un Apple per due giorni 
non costa assolutamente nulla! Sì, hai letto bene: non 
occorre sborsare nemmeno una lira. È sufficiente raggiun¬ 
gere il più vicino rivenditore Apple e chiedere un //c o un 
Macintosh (l’elenco di quasi tutti i rivenditori Apple puoi 
trovarlo a pagina 88). 


Ma affrettati, perché le richieste sono tante. Devi solo 
lasciare una piccola cauzione (che ti sarà rimborsata inte¬ 
gralmente quando riporterai il computer) e mostrare un 
documento d’identità. Potrai così uscire dal negozio col 
tuo computer sottobraccio. Per i lettori di Applicando c’è 
ancora qualcosa di più. Compila in ogni sua parte il taglian¬ 
do pubblicato qui sotto e presentalo al rivenditore: ti verrà 
riservato un trattamento di favore. 

Nel caso infatti che il computer non sia immediatamente 
disponibile, entrerai nella lista dei VIP e sarai quindi tra i 
primissimi a essere chiamato, non appena si renderà dispo¬ 
nibile un computer. Inoltre, spedendo ad Applicando 
(Corso Monforte 39, 20122 Milano) il tagliando timbrato 
dal rivenditore, riceverai in dono una ormai rara copia 
arretrata di Applicando del valore di 7mila lire, oppure, se 
sei abbonato, puoi scegliere che il tuo abbonamento venga 
prorogato, gratis, di un numero. Buon weekend! 


Nome. 

Cognome 
Via. 


CAP 

Città 


Attività 


N 


P V 


SCELGO (barrare la casella in 
corrispondenza dell’omaggio desiderato) 

□ Arretrato Applicando N. 

(attenzione! il N.2 è esaurito). 

□ Prorogate gratuitamente di 1 numero il 
mio abbonamento ad Applicando. 



Timbro e firma del rivenditore 























»qualimetric« 
su misura 




qualimetric 


Ogni calcolatore ha una sua fisionomia particolare. Lo si utilizza al meglio 
conoscendone tutte le peculiarità. La BASF grazie al know-how derivante dalle 
ricerche intensive, da particolari elaborazioni di ossidi e da una propria produzione 
e controllo ha sviluppato supporti magnetici che funzionano in armonia con il 
calcolatore. Questi prodotti su misura costituiscono l’argomento vincente e 
sono contrassegnati dal marchio BASF. 




BASF 


BASF 


FlexyDi! 


FlexyDisk 


BASF 


FlexyDisk 


BASF 

Qualità 

su 

misura 


Il supporto magnetico BASF è il 
risultato di ricerche approfondite 
ed accurati controlli. Know-how 
nella chimica e nella fisica, 
autonomia nell’elaborazione delle 
materie prime e nella miscelazione 
di ossidi, esperienza nella 
cooperazione media-sistema, 
stanno alla base della ineccepibile 
qualità BASF. 



DATA BASE 


20147 milano 
viale-legioni romane, 5 
telefono 02-4047946 
telex 315206 DATBAS 


BASF; 






BASF 





Se non volete problemi di m 
meglio far lavorare 3M. 


I problemi di memoria di 
un’azienda trovano la prima ri¬ 
sposta nella 3M già nel 1951, an¬ 
no in cui la 3M sviluppò il primo 
nastro magnetico per computer. 

Questo dato la dice lunga 
sul primato di esperienze tec¬ 
nologiche maturate in questo 
campo dalla 3M, sul patrimo¬ 
nio di qualità e affidabilità della 
produzione 3M nel settore dei 
supporti magnetici. 

Prendiamo le diskettes, ad 
esempio: omologate dai mag¬ 
giori costruttori, certificate al 
100%, garantite 5 anni, espor¬ 
tate in tutto il mondo, distribui¬ 
te in Italia attraverso una rete 
capillare di 400 punti vendita. 
E soprattutto disponibili in una 
gamma completa sia nella mi¬ 
sura da 8 pollici che in quella 
da 5 e 1/4, e con un esclusivo 
rivestimento magnetico che 
consente un'eccezionale resi¬ 
stenza all’usura e la massima 
affidabilità. 

3M ha sempre una rispo¬ 
sta pronta per i vostri problemi 
di ufficio. 

E non solo con i prodotti 
per l'informatica. Ma anche 
con i sistemi di fotocopiatura, 


microfilmatura, visual e di tele¬ 

comunicazione. 

Perchè 3M lavora offrendo 
soluzioni “ad alta tecnologia" 
per il vostro ufficio. E pertutti gli 
uffici. 

3M. SISTEMI 
PER L’UFFICIO 


La tecnologia risponde 


DISTRIBUTORI 


AUTORIZZATI IN TUTTA 
ITALIA 

VEDI PAGINE GIALLE 
I ALLA VOCE CENTRI 
MECCANOGRAFICI - 
I FORNITURE PER - |t j 

L—— JX 


. 


Prodotti per l’Informatica 

Divisione Sistemi per l’Ufficio 

Sede: Via S. Bovio, 1/3 - 20090 Milano S. Felice - Segrate Tel. 02/75451 

Filiali: Torino Tel. 011/6192192 - Mestre Tel. 041/962255 - Genova Tel. 010/451801 - 

Bologna Tel. 051/557157 - Firenze Tel. 055/355841 - Roma Tel. 06/58421 - Napoli Tel. 081/660266 

Distributori autorizzati in tutta Italia - Vedi Pagine Gialle alla voce Centri meccanografici - forniture per - t 
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Computer Center apre Genova all'informatica 

con il suo primo Computer Shop 


1984 



Computer Center guida Genova nell'informatica 

con i suoi ComputerShops 


Apple a Genova é 


flÉcippkz computer 


computer contar 

vendita-assistenza -software -corsi 


Via SVincenzo 107-I09r. tel.010/581474 Genova 
Via Storace 4 r. tel.010/454107 Ge.Sampierdarena 
Via S.Vincenzo I29r. tei. 010/581815 Genova 
Corso Gastaldi 77r. tel.010/300797 Genova 
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Mille trabocchetti, un percorso intricatissimo 
che mette in difficolotà anche gli esperti. Come uccidere 
il malvagio troll e salvare la bella principessa? Per trovare la soluzione 
c’é chi ha trascorso intere notti davanti al monitor, eppure... 
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Fuoco fatuo e notti 
insonni 


S ono presenti nelle più importanti bi¬ 
blioteche di software. Si chiamano 
ZorA:, Sherwood Foresta Masquerade , 
The Dark Cristalli Time zone e ce n’é 
perfino uno tutto italiano (intitolato 
A vventura nel castello) ideato da Enrico 
Colombini di Brescia: si tratta degli 
adventure game, un fenomeno che si 
sta diffondendo rapidamente anche in 
Italia. Il capostipite di questi giochi 
venne elaborato da un gruppo di stu¬ 
denti e professori della Stanford uni¬ 
versity. Il programma originale girava 
su un mini computer Pdp 11 della Dee e 
consisteva nell'esplorazione di luoghi 
fantastici e nella soluzione di enigmati¬ 
che situazioni. 

Gli adventure game, a differenza dei 
videogame, non richiedono riflessi da 
pilota di formula uno, bensì concentra¬ 
zione, semplicità di linguaggio, fanta¬ 
sia e creatività. Per riuscire a superare 
tutti i trabocchetti delPavventura e 


I PRINT 88 ; 8 ‘ 

9 REM ********************** 

10 REM * COPYRIGHT (0 1984 * 

II REM * 8Y MICROSPARC * 

12 REM * & APPLICANDO * 

13 REM ********************** 

100 GOSUB 1000: REM ISTRUZIONI 

110 GOSUB 2000: REM FONDAMENTI 

120 GOSUB 3000: REM GIOCO 

190 SPEED= 255: END 

300 REM *** STANZA NUMERO 30 

1000 REM *** TITOLI PRINCIPALI 

1007 TEXT : NGRMAL : NOTRACE : HOME 

1888 V/TAB 3: HTAB 12: PRINT ' FUOCO FATUO 1 

1009 VTAB 4: HTAB 12: PRJNT "DI MARK CAPELLA 8 

1010 VTAB 6: PRINT 8 SEI UN POVERO RAGAZZO DI CAMPAGNA 

CHE IL DESTINO HA VOLUTO DESIGNARE SPOSO DELLA BEL 

LA E DOLCE BRUNILDE PROPRIO DOMANIMATTINA.MA ESSEND 
0 GIOVANE E STUPIDO,HAIDECISO DI SPENDERE IL TUO UL 
TIMO GIORNO ': 

1020 PRINT -DI LIBERTA' ESPLORANDO LA VASTISSIMA FOR 
ESTÀ CHE CIRCONDA I TUOI PASCOLI. AVRESTI POTUTO 
STARE A CASA A GUARDARE LA TELEVISIONE Itt COSI y N 
ON TI SARESTI *• 

1025 PRINT "MAI PERSfi NELLA FORESTA E VISSUTO GRANDIAW 
ENTURE CHE TI AVREBBERO INSEGNATO A DIVENTARE UN U 
OMO E A SCOPRIRE IL SENSO DELLA VITA/ 

1027 VTAB 23: HTAB 3: PRINT ‘PREMI RETURN PER CONTINUAR 
E CALL - 678: HOME : VTAB 3: HTAB 12: PRIN? ‘ 

FUOCO FATUO 8 

1030 PRINT : PRINT : PRINT “ORA NELLA TRADIZIONE DI TUT 
TE QUESTE AVVENTURE. SONO SICURO CHE NON MI DARA 
I ASCOLTO E TI PERDERAI LO STESSO NELLA FORESTA. 
SICCOME ORA SONO OCCUPATO PERCHE" NON PROVI A 
LEVARTI DAI PASTICCI 8 ’ 

1035 PRINT 8 OA SOLO ? 8 : falNT 'COMUNQUE VADA...DIVERTI 
TI ! i ! 8 

1980 VTAB 24: INPUT "PREMI RETURN QUANDO VUOI INIZIARE 

. ■ 

1985 HOrlE : VTAB 3: HTAB 12: PRINT 8 FUOCO FATUO 8 : VTAB 
6 

1986 SPEED= 255: REM VELOCITA" 

1989 IWERSE : VTAB 1: HTAB 15: PRINT ‘FUOCO FATUO 8 : NORMAL 
: POKE 34,2 

1990 RETURN 

2800 REM ***OGGETTI BASE 

2010 DIM FLGX<10): REM FLAG SPECIALE PER USO INTERNO 
2820 DIM ITMX.<18).ITNI<10),EX*(10): REM LISTA OGGETTI S 
OLO PER USO INTERNO 

2030 FOR I - 1 TO 9: READ ITMX(I).ITMKI),EXKI): NEXT 
: REM DESCRIZIONE DEGLI OGGETTI BASE 

2040 DATA 38 ROTTIGLI A, UNA BOTTIGLIA VUOTA SI TROVA 
PER TERRA NEI PRESSI 

2041 DATA 67,ACQUA,UNA PICCOLA POZZA D'ACQUA CONFLUÌ 
SCE PROPRIO QUI 

2042 DATA 0.SCOPA.UNA PUZZOLENTE SCOPA STREGATA ONDEGGI 
A NELLE VICINANZE 

2043 DATA 59,SFERA,ECCO UM SFERA MAGICA DI CRISTALLO C 
HE BRILLA 

2044 DATA 51,TAPPETO,UN TAPPETO VOLANTE E' QUI AWOLTO 

2045 DATA 00,UN ANELLO NUZIALE D'ORO PER BRUNILDE OF 
FERTOTI DAL GRAN MAGO RALPH SI TROVA NELLA TUA TAS 
CA.ANELLO 

2846 DATA 75,STERC0,UN MUCCHIO DI STERCO DI PIPISTRELLO 
SI STA LENTAMENTE IMPUTRIDENDO QUI VICINO 

2047 DATA 31 ,BUCCÌA,UNA VECCHIA BUCCIA DI BAIWW GIACE 
QUI NELLO SPORCO 

2048 DATA 10,LATT1M,UNA LATTINA VUOTA DI BIRRA ARRUGGI 
NITA E' SOTTO I TUOI PIEDI 

2950 PSMZ = 1: REM CASA 
2955 TRUE = 1 
2960 FALSE = 8 
2990 RETURN 

3000 REM *** GIOCHIAMO !!! 

3085 GOSUB 3100: REM DESCRIZIONE 

3006 IF PS = 66 THEN GOSUB 12080: REM BIBLIOTECA DI 
RALPH 

3807 IF EOG THEN RETURN 
3888 GOSUB 3200: REM OGGETTO 

3810 GOSUB 4008: REM INPUT 


3015 GOSUB 5808: REM SWITCH 
3828 IF NOT EOG THEN 3885 
3098 RETURN 

3188 REM *** DESCRIZIONE STMZA 

3185 IF INT ( RND (1) * 100) ♦ 1 < 11 THEN PRINT : PRINT 
"UN PICCOLO FUOCO FATUO ALEGGIA QUI... 8 

3186 WE = MVE ♦ 1: IF WE = 1 THEN PRINT : GOTO 3118 

3107 IF m = 4 THEN WE = 0 

3108 RETURN 

3110 IF PS < 11 THEN ON PS GOTO 40810.48020,48030,4804 
0.40050,40060.40070.40088,40098,40108 

3111 IF PS < 21 THEN ON PS - 10 GOTO 48110.40120,48138 
,48148,40158,48168.48178,40180.48198.40200 

3112 IF PS < 31 THEN dN PS - 28 GOTO 40210.40228,40238 
,40240,48250,40268,48278,48280.40298.48388 

3113 IF PS < 41 THEN ON PS - 30 GOTO 40318,40328,48330 
,48348,40350,48360.40370,48388.40390,48488 

3114 IF PS < 51 THEN ON PS - 40 GOTO 48410.40428,48438 
,40440,40450I,40460.48478,40480.40498,48580 

3115 IF PS < 61 THEN ON PS - 50 GOTO 48510,40520,48530 
,40540,40550,40568.40578,40 580.48598,48600 

3116 IF PS < 71 THEN ON PS - 60 GOTO 40610,40628,48638 
,48648,40658,40660.48670,48688.40698,40788 

3117 IF PS < 81 THEN ON PS - 78 GOTO 48718.48720,48738 
,48748,48750,40760.48770,48780.40790.40800 

3118 IF PS < 91 THEN ON PS - 80 GOTO 40810,48828,48830 
,48840 

3199 RETURN 

3208 REM *** OGGETTI? 

3205 PRINT 

3210 FOR I = 1 TO 9 

3215 IF ITOI) = PS THEN PRINT 88 EXKI) 

3220 NEXT : RETURN 

4880 REM *** INPUT 

4881 REM 
4802 REM 

dflftQ PPM 

4010 PRINT : INPUT 88 ;C0MI 
4015 IF COMI = 88 THEN 4810 

4020 IF CQM* = ‘ANCORA* OR COMI = ‘RIPETI 8 AND VERBI < 

> 88 THEN RETURN 

4021 IF COMI = "ANCORA* OR COMI = ‘RIPETI 8 AND VERBI = 

8 ‘ THEN PRINT ‘NON LO PUOI FARE MCQRA SE NON mi 
FATTO NIENTE FINO AD ORA'! 8 : GOTO 4018 

4024 CP = 8 

4825 GOSUB 4180: REM VERBO 

4826 VERBI = BYI 

4830 GOSUB 4100: REM NOME 

4831 NOUNI = BYI 

4035 IF VEI = ‘NORD 8 THEN VEI = 8 N 8 
4836 IF VEI = ‘SUD* THEN VEI = ‘S 8 

4037 IF VEI = ‘EST* THEN VEI = ‘E 8 

4838 IF VEI = "OVEST* THEN VEI = 8 0‘ 

4839 IF VEI = ‘NORDEST* THEN VEI = "NE 8 

4840 IF VEI = ‘NORDOVEST 8 THEN VEI = 8 N0 8 

4841 IF VEI = "SUDEST 8 THEN VEI = 8 SE" 

4842 IF VEI = "SUDOVEST 8 THEN VEI = "SO 8 

4099 RETURN 

4108 REM *** ANALISI INPUT 

4118 IF CP > LEN (COI) THEN BYI = 88 : RETURN 

4115 FOR SP = CP ♦ 1 TO LEN (COI): IF MIDI (CO$,SP,l) 

< > 8 8 THEN NEXT 

4128 BYI = MIDI (COI,CP ♦ l.SP - CP - 1):CP = SP: IF BY 
I = "IL 8 OR BYI = ‘LO 8 OR BYI = 8 LA‘ OR BYI = 8 UN 8 OR 
BYI = *W OR BYI = "UNO* THEN 4118 
4121 IF BYI = ‘QUEL 8 OR BYI = "QUELLO 8 OR BYI = ‘QUELLA 
‘ OR BYI = 8 GLI 8 OR BYI = "LE 8 OR BYI = 88 THEN 411 
0 

4125 IF BYI = "SALTA* OR BYI = ‘VA* OR BYI = 'VIAGGIA 8 OR 
BYI = "CABINA 8 OR BYI = "MUOVI* THEN 4110 
4190 RETURN 

5808 REM *** VERO INIZIO 

5001 REM *** DELLA SUBROUTINE D'AZIONE 

5086 IF (VEI = 8 N‘ OR VEI = 8 E‘ OR VEI = 8 S‘ OR VEI = 8 
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giungere alla fine del gioco però é con¬ 
sigliabile, anzi opportuno, partecipare 
in tanti. 

Nel caso di Fuoco fatuo, l’adventure 
game che viene presentato da Appli¬ 
cando in queste pagine, é meglio avere 
un amico o un collega che lo scriva per 
voi. Infatti, anche se le soluzioni chia¬ 
ve non sono del tutto evidenti, i segreti 
potranno essere appresi dalla battitu¬ 
ra. Se invece desiderate solo imparare 
a scrivere questi giochi la lettura di 
questo articolo sarà molto utile. 

Il programma 

Per giungere a un buon grado di 
realismo occorre avere un programma 
capace di decifrare le più comuni frasi 
italiane e di agire su di esse. Se per 
giocare si dovesse rispondere a do¬ 
mande del tipo: 

SCRIVI 1 PER ANDARE A NORD, 


2 PER ANDARE A SUD. 

probabilmente ci si stancherebbe subi¬ 
to. E’ invece molto più divertente scri¬ 
vere semplicemente frasi come: 
NORD, PRENDI ORO, GETTA IL 
COLTELLO AL RAGNO. 

Si tratta di modi diversi con cui un 
computer può’ trarre significato da 
un’istruzione in italiano, nonostante le 
limitazioni.Uno dei metodi più pratici 
é quello chiamato Analisi sistema, at¬ 
traverso il quale la macchina scruta la 
potenza di comando dei giocatori in 
certe parole chiave e agisce su quelle. 
La maggior parte dei programmi fa 
uso di poche parole-metodo nelle qua¬ 
li il computer trova semplicemente un 
verbo d’azione come MUOVERE, 
GETTARE o PRENDERE. Quindi 
trova un oggetto riconoscibile. Per ri- 
conoscibile si intende qualcosa che sia 
utile o faccia parte nel gioco. Un’AU¬ 



TO é un oggetto riconoscibile, ma non 
é pratico da capire se nel mondo del 
gioco non esistono auto. Il metodo 
usato in Fuoco fatuo consiste in due 
parole modificate. In pratica il compu¬ 
ter può accettare tre o quattro frasi 
con la speranza che fra queste ci siano 
le due parole chiave. 


0" OR VE* = “NE" OR VE* = "NO" OR VE* = “SE 1 OR VE* 

= "SO") AND IT/.(8) = PS THEN PRINT 'SEI SCIVOLATO 
E CASCATO SU UW BUCCIA DI BAWW, PERCHE' NON RI 
PROVI!? 1 : RETURN 
5918 IF VE* = "N" THEN 6885 

5811 IF VE* = "E" THEN 6818 

5012 IF VE* = "S" THEN 6015 

5813 IF VE* = -0" THEN 6820 

5014 IF VE* = "NE* THEN 6025 

5015 IF VE* = "NO" THEN 6038 

5816 IF VE* = "SE 8 THEN 6835 

5817 IF VE* = "SO" THEN 6040 

5828 IF VE* = "PRENDI B OR VE* = ‘PIGLIA* OR VE* = 'AFFÉ 

RRA 8 OR VE* = "CARICA" THEN 7888 
5825 IF VE* = "LASCIA 0 OR VE* = "LMCIA" OR VE* = "GETT 
A" OR VE* = "MOLLA" THEN 8898 
5038 IF VE* = B I B OR LEFT* (VE*.4) = "IWE" THEN 9000 

5048 IF VE* = "ROMPI" OR VE* = "SFASCIA 8 OR VE* = "DIST 

RUGGÌ" THEN 18880 

5050 IF VE* = "G" OR VE* = "GIU" THEN 11808 
5860 IF VE* = "DENTRO" OR VE* = "ENTRA" THEN 13880 
5870 IF VE* = "FUORI" OR VE* = "ESCI" THEN 14088 
5888 IF VE* = "GUARDA" OR VE* = "VEDI" OR VE* = "OSSERV 
A" THEN MVE = 6; RETURN 

5890 IF VE* = "PUNTEGGIO" OR VE* = "TOTALE" THEN PRINT 
"SEI SEMPRE PERSO NEI LABIRINTI VER0?????BENE, QUES 
T0 E' TUTTO QUELLO CHE TI E' LECITO SAPERE SUI TUO 
I MERITI'!": RETURN 
5108 IF VE* = "AIUTO" THEN 15008 
5118 IF VE* = "FINE" OR VE* = "QUIT" OR VE* = "STOP" OR 
VE* = "BASTA" THEN 16880 

5111 IF VE* = "SCEMO" OR VE* = "CRETINO" OR VE* = "STRO 
NZO" OR VE* = "STUPIDO" OR VE* = "MERDA" THEN 58880 

5112 IF VE* = "IDIOTA" OR VE* = "INETTO" OR VE* = "PORC 
0" THEN 58080 

5115 IF VE* = "UCCIDI" OR VE* = "ATTACCA" THEN PRINT " 

DEVI INSEGNARMI COME UCCIDERE UN ‘NO*: RETURN 

5998 PRINT "COSA???": RETURN 

6088 REM *** MUOVERSI NEL LABIRINTO 

6885 IF N THEN PS = N: GOTO 6050 

6886 GOTO 6045 


6810 

IF E THEN PS = 

E: GOTO 6858 


6811 

GOTO 6845 



6815 

IF S THEN PS = 

S: GOTO 6850 


6016 

GOTO 6845 



6828 

IF 0 THEN PS = 

0: GOTO 6858 


6921 

GOTO 6045 



6025 

IF NE THEN PS = 

NE: GOTO 6050 


6826 

GOTO 6845 



6830 

IF (NO) THEN PS 

= NO: GOTO 6058 


6031 

GOTO 6845 



6835 

IF SE THEN PS = 

SE: GOTO 6050 


6836 

GOTO 6845 



6840 

IF SO THEN PS = 

SO: GOTO 6850 


6841 

GOTO 6045 



6845 

PRINT ‘NON PUOI 

ANDARE DA QUELLA PARTE." 


6846 

IF PS = 36 THEN 

PRINT "> BANG! < HAI URTATO UN 

MU 


R0 E mi PER DISGRAZIA RISVEGLIATO LE ROCCE CHE 

TI 


FAWO NOTARE CHE SEI PENETRATO NEL LORO REGNO. P 
01 TI COLPISCONO A MORTE.":E0G = TRUE: RETURN 

6847 RETURN 

6850 REM *** 0K? 

6855 m = 8: REM DESCRIZIONE FLAG 

6868 IF PS = 23 AND NOT FLG3K1) THEN FLGK(l) = TR: PRINT 
: PRINT "*** BANG *** !!' APPENA ENTRI L'ORO SC 
OMPARE IN UN LAMPO, MENTRE UN ENORME BARRIERA DI B 
ARRE D'ACCIAIO CADE DAL- L'ALTO CHIUDENDOTI OGNI 
USCITA.": PRINT 

6070 IF PS = 84 AND NOT FLGX<3) THEN PRINT : PRINT "S 
EI DIVENTATO PRUDENTE'!!" 

6180 IF PS = 16 THEN PRINT "UN FUOCO FATUO BLU TI CHIA 
M DA ES T " 

6181 IF PS = 18 THEN PRINT "UN FUOCO FATUO BLU TI CHIA 
hW DA EST" 

6182 IF PS = 19 THEN PRINT "UN FUOCO FATUO BLU TI CHIA 

DA SUD" 

6103 IF PS = 20 THEN PRINT "UN FUOCO FATUO BLU TI CHIA 
MA DA SUDOVEST" 

6184 IF PS = 21 THEN PRINT "UN FUOCO FATUO BLU TI CHIA 
MA DA SUDEST 5 

6185 IF PS = 22 THEN PRINT "UN FUOCO FATUO BLU TI CHIA 
MA DA DENTRO LA GROTTA" 

6106 IF PS = 23 THEN PRINT "UN FUOCO FATUO BLU BALLA A 
LL'INGRESSO DELLE GROTTE" 
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6399 IF ( NOT FLGX<2)) OR <FLGX<3)) THEN 6990 
6280 IF PS = 38 THEN PRINT "UN FUOCO FATUO VERDE TI CH 
I^W DA NORD EST* 

6201 *IF PS = 37 THEN PRINT 'UN FUOCO FATUO VERDE TI CH 
IAMA DA NORD* 

6282 IF PS = 42 THEN PRINT "UN FUOCO FATUO VERDE TI CH 
IAf$ DA EST* 

6203 IF PS = 43 THEN PRINT *UN FUOCO FATUO VERDE TI CH 
IAMA DA NORD EST* 

6284 IF PS = 44 THEN PRINT B UN FUOCO FATUO VERDE TI CH 
IAf^ DA SUD EST* 

6285 IF PS = 45 THEN PRINT *UN FUOCO FATUO VERDE TI CH 
IAhW DA SUD OVEST* 

6286 IF PS = 46 THEN PRINT *UN FUOCO FATUO VERDE TI CH 
IAMA DA SUD OVEST* 

6287 IF PS = 47 THEN PRINT *UN FUOCO FATUO VERDE TI CH 
IAMA DA SUD* 

6998 RETURN 

7080 REM *** PRENDI UN OGGETTO 

7018 FOR I = 1 TO 9 

7815 IF IT*(I) = NO$ THEN 7822 

7820 NEXT : PRINT *E' AL DI LA' DEL TUO POTERE.*: RETURN 

7022 IF IT/(I) = - 1 THEN PRINT *CE L'MI GIÀ' CON TE 
,STRULLO 1 i* : RETURN 

7024 IF TOH) = 0 THEN PRINT 'IMBROGLIONE! ! DEVI MCO 
RA LAVORARE PER QUESTO*: RETURN 

7025 IF ITO!) < > PS THEN PRINT “NON VEDO ALCUN *NO$ 

* QUI.*: RETURN 

7838 IF I = 2 AND ITO» < ) - 1 THEN PRINT *CON COS 
A PRETENDI DI PORTARE L'ACQUA?!? CON LE *MNI?!? TRO 
VATI UN CONTENITORE.*: RETURN 
7990 PRINT *OK! PERCHE' NO?":irai) = - 1 
7995 RETURN 

8800 REM »** LASCIA UN OGGETTO 
8818 FOR I = 1 TO 9 
8815 IF IT$(1) = NO$ THEN 8822 
8828 NEXT : PRINT *E' ALDILÀ' DEL TUOPOTERE.* : RETURN 
8022 IF ITO!) < > - 1 THEN PRINT "NON CE L'HAI CON 
TE!!!!!!": RETURN 

8825 IF I = 1 AND ITO2) = - 1 THEN ITO2) = PS: REM 
SE LASCI LA BOTTIGLIA,LASCI ANCHE L'ACQUA 

8990 PRINT *OK! PERCHE' NO?" : IT7.< I ) = PS 

8991 IF PS = 84 AND ITO2) = 84 AND NOT FLGX<3) THEN PRINT 
•AUURRG6GGHHHHH!! ! GRIDA LA STREGA'!!!!' IMPROVVISA 
MENTE L'ABOMINEVOLE ESSERE PRECIPITA NELLA FORNA 
CE'! AIUTO..AIUTO'!E CREMANDO LANCIA UN ULTIMO RESP 
IRÒ." 

8992 IF PS = 84 AND ITO2) = 84 AND NOT FLGX<3> THEN F 
LG7.<3) = TR:ITO3) = PS:ITO2) = - 2 

8995 RETURN 

9088 REM *** INVENTARIO 
9005 PRINT 

9810 PRINT ; PRINT *IL TUO INVENTARIO E' IL SEGUENTE:*: 

PRINT :TMP = 8 
9815 FOR I = 1 TO 9 

9828 IF irai) = - 1 THEN PRINT ""ITKDsTHP = TMP ♦ 

1 

9825 NEXT : IF TMP = FALSE THEN PRINT * (NIENTE)" 

9990 RETURN 

10088 REM *« ROMPERE 
10818 IF NO$ = "SPECCHIO* THEN 10108 
10090 PRINT "COME POSSO ROMPERLO ??": RETURN 
10108 REM *** SPECCHIO ROTTO 
18185 IF PS < ) 35 THEN PRINT *NON VEDO ALCUNO SPECCH 
IO QUI. FORSE SE CERCHI MEGLIO TROVERAI QUALCOSA" 

*: RETURN 

10118 PRINT *C'ERA QUALCOSA DIETRO QUELLO SPECCHIO. CE 

RTO MA SI' E' UN TROLL AFFAMATO. ECCOLO CHE SA 

LTA FUORI E FA DI TE UN BELBOCCQNCINO. FA NIENTE NO 
N AVRESTI POTUTOFARE NULLA CONTRO DI LUI.*:EOG = TR 
: RETURN 

11880 REM *** GIU' ??? 

11818 IF PS < ) 61 THEN PRINT "NON PUOI PASSARE ATTRA 
VERSO LA ROCCIA SOLIDA....STUPIDO!!!": RETURN 
11898 PRINT "RAGAZZO DEVI ESSERE SCEMO, TI AVEVO GIA'D 


ETTO DI NON SALTARE. ORA SEI MORTO!":EOG = TR: RETURN 

12808 REM *** IL MAGO RALPH 
12085 IF FLGX<2) THEN 12188 

12818 PRINT : PRINT "RALPH TI STA SQUADRANDO BEN BENE.. 
....LASAGGEZZA ACCUMULATA NEGLI ANNI FA BELLA MOSTR 
A DI SE IN QUEL CORPO. COSA C'E' -TI CHIEDE- CHE 
DESIDERI CON TANTA INSISTENZA DA INTERROMPERE 
I MIEI STUDI, VILLANO! !??"': 

12815 INPUT ANS*: IF mi = 'LIBERTA'* OR ANS$ = 'AIUTO 
* OR mi = ‘FUORI* OR ANS$ = "CASA* THEN 12048 
12020 PRINT : INPUT “COSA??? VUOI LEVARTI DAI PIEDI???* 

.^ 5 $ 

12825’ IF LEFT$ <ANS*.l) = "S* THEN 12040 
12030 PRINT : PRINT 'BENE BENE, DATO CHE NON RIESCO PRO 
PRIO A CAPIRTI...SONO COSTRETTO A UCCIDERTI "-DOPO 
AVER DETTO QUESTE PAROLE TI FA SPARIRE IN UNA N 
UBE ARANCIONE CON UN SEMPLICE GESTO DELLE MANI!! 
•*:EOG = TR: RETURN 

12040 IF ITMX<4) = - 1 OR ITMX<5) = - 1 THEN PRINT : 
PRINT *MI SAREBBE PIACIUTO AIUTARTI, MA MI CON 
TE UN MIO TESORO. E A ME NON SONO MI PIACIUTI I 
LADRI!!! TI COWIENE DIREADDIO AL MONDO FINCHE' SE 
I IN TEMPO" ! ! !":EOG = TR: RETURN 
12045 PRINT : PRINT *VA BENE, TI AIUTERÒ'...MA PRIMA VO 
GLIO UN FAVORE. C'E' UM CERTA STREGA SU A NORD 
CHE. ARRABBIATA CON ME, MI HA PORTATO VIA CON 
UN INCANTESIMO IL MIO BASTONE MAGICO* 

12858 PRINT : INPUT "E LO HA TRASFORMATO IN UN MANICO D 
I SCOPA. EBBENE IO LO VOGLIO INDIETRO!! SERIUSC 
IRAI A RUBARGLIELO. TI AIUTERÒ' AD USCIRE DA QUESTO 
POSTO. D'ACCORDO???*;ANS$ 

12855 IF LEFT* <ANS$.l) < > *S" THEN PRINT : PRINT " 

COSA!! ! IO CERCO DI AIUTARE TE E TE NON AIUTI ME!!' 

BENE TI AIUTERÒ' LO STESSO. .MA A FINIRE IN UM TOM 

BA!! ! -E DOPO CIG'TI TRAFIGGE CON LA SPADA. SEI MOR 

TO.*:EOG = TR 

12856 IF LEFT* (ANS$.l) < > "S* THEN RETURN 

12068 PRINT : PRINT 'BENE'!!' ORA PUOI ANDARE, MA LA ST 
RADA PER TROVARE IL PAESE DELLA DONNA NON E' SEMPL 
ICE. TUTTI 1 SENTIERI PORTANO APPOSTA LONTMG 
DA QUELLA TERRA.* 

12065 PRINT : PRINT *M SE TU RIESCI A INVERTIRE GLI SC 
HERZI DEL FUOCO FATUO VERDE, POTRAI ARRIVARCI SEMPL 

IGEMENTE.OK...E ORA PER FINIRE.* 

12078 PRINT : PRINT *IL M60 ALZA LE IttNl E CON DUE GES 
TI TI FA PASSARE ATTRAVERSO IL PARADISO DELLE SENSA 
ZIONI PER POI LASCIARTI SOLO. TI SVEGLI E TROVI.. 

s 


12875 PS = 36:FLGX(2) = TR:W = 8: GOSUB 3180 
12888 RETURN 

12188 REM *** SECONDO VIAGGIO 

12104 SPEED= 120 

12105 PRINT : PRINT ‘BENE,-DICE IL MG0-, VEDO CHE SEI 

TORNATO...." 

QPPPft= 

12110 IF ITWK4) = - 1 OR ITMX(5) = - 1 THEN PRINT * 
E CERCHI DI RUBARMI IL TESORO"' RAGAZZ00RMA1 LO HA 
1 FATTO...IMPAZZI SCO....E UN MAGO PAZZO E' PERICOLO 

SO!" >PQQF<.SEI MORTO! "*:EOG = TR: RETURN 

12115 IF ITMX(3) < ) - 1 THEN PRINT *E CHE MI LE MA 
NI VUOTE"' NON SOPPORTO PIU' LA TUA FACCIA!!! TRAS 
FORATI IN ZANZARA'" -E CON UN GESTO DELLE DITA 
TITRASFORMA IN ZANZARA E SUBITO VIENI MANGIATO DA 
UN RAGNO.*:EOG = TR: RETURN 
12319 3PEED= 128:ITO6) = - 1 
12128 PRINT *E HAI CON TE IL BASTONE!! ! OTTIMO LAVORO.C 
ON CIO' TI REGALO LA LIBERTA' E TI FACCIO UN DON 

0" ! GUARDA CIO CHE TI HO DATO PIU' TARDI.' 

12125 PRINT : PRINT *>POOF< STAI ORA SOTTO UN ENORME E 
BEL ALBERO FRONDOSO.*: GOSUB 9808: REM INVENTARI 
0 

12130 PRINT : PRINT "LA TUA DOLCE BRUNILDE STA CORRENDO 
TI INCONTRO ATTRAVERSO IL PRATO COME SE FOSSE 
PORTATA DAL VENTO.LA VITA E' TGRNATA A FIORIR 
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Una volta che il computer capisce 
un comando italiano non resta altro 
che far agire il programma su delle 
routine prestabilite e collegate alle 
due parole. E’ questa la parte più diffi¬ 
cile ma anche la più divertente, poiché 
permette di inserire un’infinita varietà 
di circostanze, anche le più stravagan¬ 
ti. Se c’é una pozza con dell’acqua, per 
esempio, il giocatore potrà prenderne 
un po’ solo se avrà con sé un contenito¬ 
re; potrà uccidere un troll solo se in 
possesso di armi magiche; potrà aprire 
una porta solo se avrà risolto un rebus 
e così via. Se le cose non si amalgama¬ 
no bene, si perde la credibilità e il 
gioco diventa poco interessante. E più 
la fantasia é ben usata più sono le ore 
di gioco assicurate dall’avventura. 

Nel programma non é stato fatto 
altro che creare delle routine su delle 
parole chiave come PRENDI, LA¬ 


SCIA, INVENTARIO, MUOVI 
ecc., per poi elaborarle con ingegno e 
fantasia. Per esempio, la routine colle¬ 
gata a PRENDI permette di prendere 
qualsiasi cosa sia possibile e di tenerla 
con te per tutta la durata del gioco.Co¬ 
munque, se si prova a prendere una 
pozza d’acqua con le mani, la routine 
risponderà che é impossibile o che sei 
matto. Ma se si vuole solo l’acqua e si 
ha con sé un contenitore allora il pro¬ 
gramma permetterà l’azione e una vol¬ 
ta terminata aspetterà un nuovo co¬ 
mando. In questa maniera, molti nuo¬ 
vi oggetti possono essere introdotti nel 
gioco. 

Come usare 
le variabili 

Il gioco é alquanto semplice, e nu¬ 
merose modifiche possono essere ef¬ 



fettuate senza problemi, insieme a 
quelle che verranno suggerite più 
avanti. Per comprendere bene come il 
gioco funzioni si é provveduto a elen¬ 
care un piccolo commento per ogni 
variabile e per ogni subroutine. 
Questo dovrebbe servire ai meno 
esperti e dare la possibilità ai più bravi 
di scrivere poi la loro avventura. 


E INTORNO A TE E ..TUTTO E" BENE CI0 / CHE FINI 

SCE BENE* 

12131 PRINT “SPERO TI SIA DIVERTITO IN QUESTO PICC0LOVI 
AGGETTO CHE DATO NON AVEVI ALTRO DA FARE': FOR X = 
1 TO 1080: NEXT : INVERSE : PRINT : PRINT "HAI STOL 

7AMENTE VOLUTO CON TUTTO TE STESSO'« ! !. 

...' :N OR MA 

12132 GOSUB 55888:E0G = TR: RETURN 

13088 REM *** DOVE VAI? 

13818 IF PS = 22 THEN VE* = "SO": GOTO 6040 
13820 IF PS = 7 THEN VE* = “E“: GOTO 6018 
13898 PRINT "VAI DENTRO DOVE??": RETURN 

14080 REM *** DA DOVE VIENI 9 

14810 IF PS = 23 THEN PRINT “LE BARRE SONO MOLTO SOLID 
E E TU SEI SOLOUN POVERO RAGAZZO. NON PUOI USCIRE': 
RETURN 

14815 IF PS = 1 THEN VE* = “0": GOTO 6828 
14898 PRINT "VAI FUORI DA DOVE??": RETURN 
15880 REM *** AIUTO!!!!! 

15010 PRINT : INPUT “VUOI VERAMENTE UN PICCOLO AIUTO?? 
“:ANS*: IF LEFT* <ANS*,1) < > “S“ THEN PRINT "BE 
NÉ, SE NON LO VUOI. TORNA A GIOCARE.": RETURN 
15815 PRINT : PRINT “CON 'PRENDI' RACCOGLI UN OGGETTO. 
CON 'LASCIA" LO MOLLI. CON "INVENTARIO" TI DICÓ 
COSA HAI . CON "N","S", SE" ETC. VAI A NORD. A SU 
D, A SUDEST. ETC. É CON "FINE" TERMINI IL GIOCO" 
15028 PRINT : PRINT "SE INCONTRI UNA STREGA E VUOI UCCI 
DERLA.DEVI SPIEGARE COME.DOVRESTI AVERE ALCUNIOGGET 
TI: UTILIZZALI. QUESTO E" TUTTO!!“: PRINT : RETURN 

16008 REM *** FINE DEL GIOCO 
16818 PRINT : INPUT "VUOI VERAMENTE SMETTERE ORA 9 
S*: IF LEFT* (ANS*,1> < > "S" THEN PRINT "BENE. 

SE HAI CAMBIATO IDEA, ALLORA TQRNAA GIOCARE !!!!!*: 
RETURN 

16028 PRINT : PRINT “OR. MAI NON MI FATTO MOLTO"!" 

16825 IF PS < 23 THEN PRINT "NON HAI TROVATO NEMMENO L 
E GROTTE"": GOTO 16858 

16826 IF NOT FL(?/.<2) THEN PRINT "NON MI INCONTRATO I 
L MAGO"!!!!': GOTO 16058 

16827 IF NOT FLG7.(3) THEN PRINT "NON UCCIDERAI MI LA 
STREGA"!": GOTO 16850 

16828 PRINT "NON HAI PRESO IL BASTONE PER IL MGOHH!" 

: GOTO 16858 


16858 PRINT : PRINT "SIGH...BENE,CREDO SARAI STANCO.... 

.":E0G = TRs RETURN 
40818 REM *** STANZA NUMERO 1 
40813 PRINT “SEI IN UW PICCOLA FATTORIA.NON E" MOLTQM 
LA CHIAMI CASA.INFATTI NON E" PER NIENTE BELLA. 
....E" DI SGUSTOSA...SCIALBA,NON PUÒ" ESSERE UW CAS 
A.C"E" \JM PORTAVERSO OVEST 

40818 N = 8:E = 8:S = 8:0 = 7:NE = 8:N0 = 8:SE = 8:S0 = 

0 

48819 RETURN 

48828 REM *** STANZA NUMERO 2 
40823 PRINT “SEI SEMPRE NELLA FORESTA.SEMBRA CHE TI SI 
A PERDUTO. M NON SI SA MAI CON DEI POVERI CONTAD 
INI COME VOI... 

40828 N = 0:E = 8:S = 8:0 = 8:NE = 4:N0 = 3:SE = 0:SO = 

8 

40029 RETURN 

40838 REM *** STMZA NUMERO 3 

48833 PRINT "SEI IN m FORESTA CON ENORMI ALBERI. LA 

FORESTA E" PIEW DI NOCI. 

48038 N = 0:E = 8:S = 8:0 = 0:NE = 8:N0 = 8:SE = 2:S0 = 

5 

48839 RETURN 

40840 REM *** STANZA NUMERO 4 
48043 PRINT "SEI NON TI SEI PERSO ALLORA SAI DI ESSER N 
ELLA FORESTA. (NON HA ALCUN SENSO VERO??) 

48048 N = 8:E = 8:S = 8:0 = 0:NE = 8:N0 = 8:SE = 15:S0 = 
2 

48049 RETURN 

40850 REM *** STANZA NUMERO 5 
40053 PRINT “SEI IN UNA FORESTA CON ENORMI ALBERI. LA 
FORESTA E" PIENA DI NOCI. 

48858 N = 8:E = 8:S = 8:0 = 8:NE = 3:NQ = 8:SE = 8:S0 = 

6 

48859 RETURN 

48868 REM *** STANZA NUMERO 6 
40863 PRINT “LA FORESTA TI E" INTORNO. TU SEI NELLA FO 
RESTA. NELLA FORESTA SEI, LA FORESTA TI SOVRASTA, 
TI SEI PERSO NELLA FORESTA.VUOI CHE T£ LO DICA ANCO 
RA? SEI NELLA ENORME FORESTA CON IL RESTO DELLE N 
0CI. 

48868 N = 8:E = 8:S = 8:0 = 8:NE = 5:N0 = 8:SE = 7:30 = 

8 
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34170 GORIZIA - CORSO ITALIA. 149 TELEFONO 0481/30909 

appi© 

Disk Drive slim L. 550.000 

Dop pio controller L. 100.(.00 

Languaqc card 16 K: L 90 000 

Z-80 p er CP/m: L. 99.000 

80 colonne con soft switch: L. 150.000 

Super Serial Card : L. 160.000 

Clock Card (indipensabile con il PRO-DOS): L. 95.000 

Pro g rammatore di EPROm (2716-52-64) L 120 000 

Scheda Pai Color con suono: 90.000 

128 K RAID L 380.000 

Wild Card per Apple II (per copiare tutti 

i programmi): L. 90.000 

RS-252 monodirezionale L. 120.000 

Joystick autocentranti: L. 42.000 


moniroa 

monitor 12" fosfori verdi antiriflesso: L. 220.000 
monitor 12" fosfori g ialli antiriflesso: L. 240.000 
monitor a colori ingresso PAL e audio. L. 520.000 

Solo per a p piè Ile 

Espansione 64K + 80 colonne : L. 220.000 

SOFTWA1I FIimAOmTOiH 

microsoft Basic - multiplan - multifile - multiword 
-multichart 

CFS un potente Data Base per il mac 

da Vinci Buildings - Landscapes - Interiors per il disegno 

edifici di interni e di esterni 

Sar g on IH il piu* potente e veloce campione di scacchi 
macFORTH compilatore ed interprete - velocissimo 
Tanti altri ancora tutti a prezzi interessantissimi 
chiedete lista e prezzi 

SOPTWAll Fin AFFLI 

Programmi educativi per Apple. Biologia, Fisica, 
Chimica, matematica. Geografia - chiedete elenco 
con disponibilità' e specifiche. 

Basic Esteso con gestione di numeri e funzioni complesse 
Doublestuff ovvero il software per gestire la doppia 
risoluzione 

di Apple //e - 560 x 192 punti in alta risoluzione ! 


FStepppiteife (scatola da 10) tutti con anello di rinforzo: 


tipo 

nashua 

memorex 

3m- Scotch 

sf-dd 

45.000 

50.000 

55.000 

df-dd 

56.000 

66.000 

73.000 


VEnpiTA PER CORRISPOnDEnZA 

Tutti i prezzi indicati comprendono IVA e spese di 
spedizione. 

non si accettano ordini per importi inferiori a 5Ó.000 

Prezzi soggetti a variazioni. 


408Ò9 RETURN 

48870 REM *** STANZA NUMERO 7 

J 0073 PRINT "SEI DAVANTI AD UW DECREPITA, PICCOLA E SP 
ORCA FATTORIA ABBANDONATA. RESPIRI A PIENI POLMONI 
ARIA FRESCA. UN SENTIERO BEN BATTUTO PORTA A NORD 
DENTRO LA FORESTA. 

49078 N = 5:E = 1 :S = 0:0 = 8:NE = 0:N0 = 0:SE = 0:30 = 

8 

40879 RETURN 

48880 REM. *** STANZA NUMERO 8 

48883 PRINT “SEI NELLA FORESTA. CI SONO GROSSI FUNGHICH 
E SEMBRANO MANGERECCI MA CHE SECONDO ME SONO VELEN 
OSI. FOSSI IN TE NON LI MANCEREI. 

40888 N = 6:E = 0:S = 0:0 = 0:NE = 0:NO = 8:SE = 9:S0 = 

0 

48889 RETURN 

48090 REM *** STANZA NUMERO 9 

40093 PRINT 'NON E" UN BEL POSTO LA FQRESTA???CI SONOAL 
BERI. SCOIATTOLI. NOCI. BACCHE E MCHECESPUGLI E TU 
MI SEMBRA CHE TI CI SIA PERDUTO. MA E' UN BEL PO 
STO!! 

48898 N = 0 : E = 0:S = 0:0 = 0:NE = 8:N0 = 8:SE = 10:SO = 

0 

40099 RETURN 

40180 REM *** STANZA NUMERO 18 

48103 PRINT "RAGAZZO NON FAI ALTRO CHE INOLTRARTI NE 
LLA FORESTA. PERCHE*' HAI LASCIATO LA BELLA CATAPEC 
CHIA PER CERCARE NUOVE AVVENTURE? SE VUOI AWEN 
TURE ALLORA SEI NEL POSTO SBAGLIATO!!' 

48188 N = 8sE = 8:S = 0:0 = 8:NE = llsNO = 9:SE = 0:SO = 

0 

40189 RETURN 

48118 REM *** STANZA NUMERO li 

48113 PRINT 'SEI NELLA FORESTA E SEI MOLTO LONTANO DAGA 

SA.POTREBBERO ESSERCI DEI MOSTRI.POTREBBERO.ES 

SERE ANCHE..DIETRO..DI TE..AH AH TI HO SPAVENTATO.B 

EH,PER ORA SEI NELLA FORESTA CON DEGLI SCOIATTOLI. 

■ 

48118 N = 8:E = 0:S = 0:0 = 0:NE = 0:NO = 8:SE = 12:SQ = 
10 

48119 RETURN 

48128 REM *** STANZA NUMERO 12 

48123 PRINT 'LA FORESTA SI STA FACENDO SEMPRE PIU" OS 
CURA E TU ORA DOVRESTI ESSERE A LETTO.TI CONVERREBB 
E TORNARE A CASA... SEMPRE CHE LA CATAPECCHIA CI SI 
A ANCORA' 1 

40128 N = 0:E = 0:S = 8:0 = 8:NE = 13:N0 = 11:SE = 0:SO = 
0 

48129 RETURN 

48130 REM *** STANZA NUMERO 13 

40133 PRINT "RAGAZZO,E' PROPRIO BUIO ORA...MOSTRI....PO 
TREBBERO ASSALIRTI. PERCHE" NON TORNI DALLA MAMMA?? 

40138 N = 14:E = 8:S = 0:0 = 9:NE = 17:N0 = 8:SE = 0:SO = 
8 

40139 RETURN 

48148 REM *** STANZA NUMERO 14 

40143 PRINT 'AM'" SEI IN UNO SPIAZZO E C"E" UN BEL SE 
NTIERO CHE PORTA A SUDOVEST. CI SONO ANCHE ALTRI S 
ENTI ERI MA A TE PIACE SOLO QUESTO (CHISSÀ' PERCHE") 

40148 N = 15:E = 0:S = 13:0 = 0:NE = 0:NO = 8:SE = 0:SO = 
7 

48149 RETURN 

48150 REM *** STANZA NUMERO 15 

48153 PRINT “BUON PER TE. PERDENTE SENZA SPERANZA,CHEOR 
A SEI....SEMPRE NELLA SOLITA OSCURA, BRUTTA, ORRIB 

ILE. VECCHIA FORESTA E.PROBABILMENTE CI MORIRAI 

ANuHE.MANGIATO DAGLI SCOIATTOLI.. 

40158 N = 0:E = 0:S = 14:0 = 0:NE = 8:N0 = 4:SE = 0:SO = 

0 

40159 RETURN 

40168 REM ♦** STANZA NUMERO 16 

40163 PRINT 'NON SI VEDE PIU" NIENTE, TUTTI I SE 

NTIERI SEMBRANO UGUALI E DA CIO" NON PUOI TRARRE V 
ANTAG6I0. 
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Lista delle variabili 

ANS$ usata per immagazzinare le ri¬ 
sposte alle domande dirette. 

BY$ subroutine 4100 ritorna la pa¬ 
rola successiva della linea di comando 
in questa variabile dopo un gosub. 

COM$ comando di azione del gio¬ 
catore. 

CP punta la fine dell’ultima parola 
usata in COM. 

E contiene il numero della stanza ad 
est dalla presente. 

EOG fine della flag di gioco; falsa 
fino a che non si muore. 

EX$() lista delle descrizioni degli 
oggetti. 

FALSE costante ;uguala a 0. 

FLG% Ospedale lista delle flag im¬ 
magazzina lo stato di molte possibili 
azioni; usate soltanto le prime tre (1-3) 
delle dieci flag disponibili. 


I semplice variabile d’indice. 

ITM%() lista delle locazioni di regi¬ 
stro: se 1 allora l’oggetto e stato preso; 
se 0 oggetto non ancora introdotto nel 
gioco ;un numero positivo indica inve¬ 
ce il numero di stanza dove l’oggetto si 
trova. 

ITM$() lista dei nomi di registro. 

MVE descrizione di una stanza: se 
la stanza é nuova e=0 effettua la de¬ 
scrizione; se sei nella stessa stanza do¬ 
po cinque mosse ripete la descrizione. 

N contiene il numero di stanza a 
nord dalla presente. 

NE contiene il numero di stanza a 
nord-est dalla precedente. 

NOUN$ il nome del comando fatto 
dal giocatore. 

NO contiene il numero di stanza a 
nord-ovest dalla precedente. 

PSMZ dove si trova il giocatore. 

S contiene il numero di stanza a sud 



dalla precedente. 

SE contiene il numero di stanza a 
sud-est dalla precedente. 

SP variabile d’indice per la routine 
di comando. 

SO contiene il numero di stanza a 
sud-ovest dalla precedente. 

TRUE costante; e=l 


40168 N = 8:E = 18:S = 17:0 = 0:NE = 0:NO = 15:SE = 0:SO 
= 0 

48169 RETURN 

48170 REM *** STANZA NUMERO 17 

40173 PRINT "NON SI VEDE PIU" UN TUBO, TUTTI I SE 
NTIERI SEMBRANO UGUALI E DA CIO' NON PUOI TRARRE V 
ANTAGGIO. 

40178 N = 16:E = 8:S = 0:0 = 0:NE = 0:NO = 0:SE = 0:SO = 
13 

40179 RETURN 

40180 REM *** STANZA NUMERO 18 

40183 PRINT -NON SI VEDE PROPRIO NIENTE DI NIENTE. I SE 
NTIERI SEMBRANO TUTTI UGUALI E DA CIO'NON PUOI TRAR 
RE VANTAGGIO.' 

40188 N = 15:E = 19:S = 17:0 = 16:NE = 15:N0 = 15:SE = 1 
7:SO = 17 

40189 RETURN 

40198 REM *** STANZA NUMERO 19 

40193 PRINT “NON SI VEDE PIU' UNA CICCA, TUTTI I SE 
NTIERI SEMBRANO UGUALI E DA CIO" NON PUOI TRARRE V 
ANTAGGIO. 

40198 N = 15:E = 15:S = 28:0 = 18:NE = 15:N0 = 15:SE = 1 
5:S0 = 17 

48199 RETURN 

40280 .REM *** STANZA NUMERO 28 

48283 PRINT “NON SI VEDE UN ACCIDENTI DI NIENTE.TUTTII 
SENTIERI SEMBRANO UGUALI E DA CIO' N0NPU0I TRARRE A 
LCUN VANTAGGIO. 

48288 N = 19:E = 15:S = 15:0 = 17:NE = 15:N0 = 17:SE = 1 
5:SO = 21 

48289 RETURN 

48218 REM *** STPNZA NUMERO 21 

48213 PRINT “NON VEDO PIU" NIENTE,TUTTI I SENTIERI SE 
MBRANQ UGUALI E DA CIO" NON PUOI TRARRE VANTAG 
GIO. 

48218 N = 17:E = 15:S = 0:0 = 17:NE = 20:N0 = J7:SE = 22 
:S0 = 8 

48219 RETURN 

48220 REM *** STANZA NUMERO 22 

48223 PRINT “SEI DI FRONTE ALL'INGRESSO DI UM GRANDEGR 
OTTA IN CUI SEMBRA ESSERCI UN ENORME VASO PIENO D' 
ORO.SEI RICCO*! POTRAI GUARIRE TUA MADRE E COMP 
RARE LE SCARPE A TUA SORELLA" COME SEI FORTUNATO! 

i I I 


40228 N = 15 : E = !5:S = 15:0 = 17 :NE = 15:N0 = 21:SE = 1 
5:S0 = 23 

48229 RETURN 

48230 REM *** STMZA NUMERO 23 

48233 PRINT 'SEI NELLA GROTTA.L'USCITA E' BLOCCATA DAEN 
ORMI SBARRE D'ACCIAIO CHE NON POTRANNOMAI ESSERE T0 
LTE.SEI IN RITARDO AL TUO MATRIMONIO E BRUNILDE CO 
MINCERA' ANCHE APIANGERE FRA UN PO'. 

48238 N = 0:E = 0:S = 24:0 = 8:NE = 8:N0 = 8:SE = 0:SO = 

0 

40239 RETURN 

40240 REM *** STANZA NUMERO 24 

48243 PRINT "SEI NELLA VERA SERIE DI GROTTE ORA.CI SO 

NO MOLTI TUNNELS QUI DENTRO E CE NE E'UNO MOLTO GRA 
NDE CHE PORTA AD EST., MA PUOI ANCHE NON ASCOLTARM 
I E ANDARE VERSQOVEST. 

40248 N = 23:E = 28:S = 25:0 = 26:NE = 0:NO = 0:SE = 8:S 
0 = 8 

48249 RETURN 

40258 REM «# STANZA NUMERO 25 

48253 PRINT “ALLORA VEDIAMO.. .C"E' UN TUWEL CHE VA VE 
RS0 EST/OVEST E C'E' m PICCOLA FENDITURA ABB 
ASTANZA LARGA CHE PORTA A NORDEST. 

48258 N = 8:E = 28:S = 8:0 = 26:NE = 24:NQ = 8:SE = 8:S0 
= 8 

48259 RETURN 

48268 REM *** STWZA NUMERO 26 

48263 PRINT “IL TUNMEL SI BIFORCA PROPRIO QUI. CH 
E CONFUSIONE VERO?* 

48268 N = 24:E = 25:S = 27:0 = 8:NE = 8:N0 = 0:SE = 8:S0 
= 0 

48269 RETURN 

40278 REM *** STANZA NUMERO 27 

48273 PRINT 6 IL TUNNEL IN QUESTO PUNTO COMINCIA A DI 
VENTARE LEGGERMENTE TORTUOSO. A PROPOSITO. SE 
TI STAI CHIEDENDO COME PAIA VEDERE SE SEI A UNA PR 
0F0NDITA' DI UW CINQUMT1W DI METRI, SAPPI CHE 
QUI B 

48275 PRINT -L'ARIA E' MGICA E MANDA UN BAGLIORE DI LU 
CE ALL'INTERNO' 

48278 N = 0:E = 26:S = 38:0 = 0:NE = 0:NO = 0:SE = 8:S0 = 
0 

40279 RETURN 

48280 REM *** STANZA NUMERO 28 


% 
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VIA ROMA 11 - 13051 BIELLA 
TELEFONO 015 - 29875-24181 


RIVENDITORE AUTORIZZATO 

f^cippkz computer ine. 



SOFTWARE 

• FATTURAZIONE 
APPLE Ile - APPLE Ile 

• CONTABILITÀ GENERALE 
80CL PRODOS SU PROFILE 

• NUOVA CONTABILITÀ 
SEMPLIFICATA 

MULTIAZIENDALE 80 COLONNE 

• GESTIONE PARROCCHIE 
ALBERGHI RISTORANTI CAMPEGGI 

• GESTIONE DIETE E PROFILI 
DI LABORATORIO 

HARDWARE 

• INTERFACCE PER OLIVETTI 
ET 121-201-221-111 

• INTERFACCE PER ADLER 
G 8008-SE 1005-1010-1030 


40283 PRINT 'SEI AD NCR0C10 CON QUATTRO PASSAGGI. QUAL 
I DI QUESTI PENSI SIA CONVENIENTE PRENDERE? IO 
NATURALMENTE NON TI DO PIU" CONSIGLI !!’ 

48288 N = 24:E = 8:S = 31:0= 25:NE = 8iN0 = 0:SE = 8:S0 
= 29 

48289 RETURN 

40290 REM *** STAN2A NUMERO 29 
40293 PRINT 'SEI ORA AD UN INCROCIO DI DUE PICCOLI PA 
SSAGGI. UNO PORTA A NORDOVEST, L'ALTRQA SUD. WHH.. 
.SUL MURO MI PARE CI SIA utè SCRITTA: 'MORIRAWO 
COLORO CHE UANNOA SUD".... 

40298 N = 8:E = 0:S = 38:0 = 0:NE = 8:N0 = 2ò:SE = 8:S0 = 
8 

40299 RETURN 

48308 REM *« ROOM NUMBER : 30 
48383 PRINT "NON POCHI PASSAGGI LASCIANO QUESTO PO 
STO. RIESCI A TROVARLI?'? 

48308 N = 27:E = 8:S = 0:0 = 8:NE = 8:N0 = 0:SE = 36:S0 = 

37 

48389 RETURN 

48310 REM *** STANZA NUMERO 31 
48313 PRINT *C'E' BUIO PESTO QUI. NON POSSO DIRTI NI 
ENTE TRANNE CHE UNA GRANDE ROCCIA IMPEDISCE ALL 

' ARIA MAGICA DI FARTI LUCE .AH.GUARDA CHE SONO D 

IECI MINUTI CHE CONTINUI A SBATTERE IL MSO CONTRO 
I MURI.... 

40318 N = 0:E = 8:S = 33:0 = 28:NE = 0:NO = 8:SE = 32:S0 
= 0 

48319 RETURN 

48328 REM *** STMZA NUMERO 32 
48323 PRINT B AHA! SEI RIUSCITO A TROVARE UN'USCITA, BE 
NISSIMO, ORA PUOI SEGUIRE IL PROSSIMO TUNNEL CHE TI 
CONDUCE A SUD. 

48328 N = 0:E = 8:S = 34:0 = 8:NE = 0:NO = 8:SE = 0:SO = 

0 

40329 RETURN 

40330 REM *** STANZA NUMERO 33 

40333 PRINT "BEAH! QUANTA POLVERE!! TI IMPEDISCE DI TE 
NERE GLI OCCHI APERTI. SEGUIMI A NORD 0 A SUDOVEST 
E SAREMO FUORI IN POCO TEMPO... 

48338 N = 31:E = 8:S = 8:0 = 8:NE = 8:N0 = 0:SE = 0:SO = 
35 

40339 RETURN 

48348 REM *** STANZA NUMERO 34 

48343 PRINT "UNA IMPROVVISA CURVA NEL SENTIERO TI FA SE 
GUIRE m STRADA DIFFERENTE. 

40348 N = 32:E = 0:S = 0:0 = 39:NE = 0:NO = 0:SE = 0:SO = 
8 

48349 RETURN 

40358 REM *« STANZA NUMERO 35 

40353 PRINT "QUESTI TUNNELS SEMBRANO SENZA F1NE.VER0?PQ 
TRESTI QUINDI SORPRENDERTI SE TROVI QUALCOSA...FO 
RSE SE ROMPI LO SPECCHIO GIGWTESCQ SUL MURO A OV 
EST POTRESTI TROVARE VERAMENTE QUALCOSA DI 
INTERESSANTE PROPRIO DIET 

48358 N = 8:E = 0:S = 0:0 = 0:NE = 33:N0 = 0:SE = 8:S0 = 

38 

40359 RETURN 

48368 REM *** STANZA NUMERO 36 
40363 PRINT "SEI ENTRATO IN UNA PICCOLA SALA DI ROCCECH 
E.. .DORMONO.. .CREDO STI^O DORMENDO POICHÉ' NON S 
I MUOVONO. ESCI QUATTO QUATTO E NON LE SVEGLIER 
AI. 

48368 N = 0:E = 0:S = 41:0= 0:NE = 29:N0 = 30:SE = 8:S0 
= 8 

48369 RETURN 

48378 REM *« STMZA NUMERO 37 
48373 PRINT "SEI IN lltt PICCOLA GROTTA MURATA. UN SE 
NSO DI VERTIGINE TI CONFONDE LA TESTA. 

48378 N = 36 : E = 36:S = 42:0 = 0:NE = 36:N0 = 30:SE = 36 
:S0 = 8 

48379 RETURN 

40388 REM *** STMZA NUMERO 38 

40383 PRINT "BENE...IL MESSAGGIO DOVEVA ESSERE ERRATOSE 
SEI ANCORA VIVO'! 

48388 N = 8:E = 8:S = 0:0 = 8:NE = 35:N0 = 0:SE = 0:SO = 

41 

40389 RETURN 

48398 REM *** STMZA NUMERO 39 
48393 PRINT "CI SONO TRE PASSAGGI. TI AIUTERÒ' DICENDQT 
I CHE PORTANO A NORD, A OVEST, A SUD. 
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40398 N = 34:E = 8:S = 40:0 = 33:NE = 0:N0 = 8:SE = 0:SO 
= 0 

48399 RETURN 

40488 REM »** STANZA NUMERO 48 

40483 PRINT “CI SONO QUATTRO SENTIERI QUI....MH.QU 

ALCUNO STA CANTANDO AD ALTA VOCE liti BELLISSIMA CA 
NZQNE....SEMBRA QUI VICINO. PUÒ" ESSERE UN SEGNO? P 
IT AIUTARTI AD USCIRE DA QUI? PUÒ' FARTI ARRIVARE 
A CASA??? 

48488 N = 35:E = 39:S = 0:0 = 41:NE = 0:NO = 8:SE = 8:S0 
= 48 

48489 RETURN 

48410 REM »* STANZA NUMERO 41 
40413 PRINT 'IL PASSAGGIO VOLTA UN MGOLO. QUESTO E' TU 
TTO, LA STAN2A NON MERITA ALTRA ATTENZIONE.. 

40418 N = 36:E = 0:S = 0:0 = 0:NE = 38:N0 = 0:SE = 8:S0 = 
8 

40419 RETURN 

40428 REM *** STMZA NUMERO 42 

40423 PRINT "I TUWELS TI mib CONFUSO LA TESTA! INONUS 
CIRAI MAI VIVO DA QUI!! 

48428 N = 37:E = 41 :S =41:0 = 43:NE = 41 :N0 = 0:SE = 41 
:S0 = 41 

40429 RETURN 

40438 REM *** ST^MZA NUMERO 43 

40433 PRINT "I TUNNELS TI HtfHQ CONFUSO LA TESTA!!NONUS 
CIRAI MAI VIVO DA QUI!! 

40438 N = 42:E = 42:S = 41:0 = 0:NE = 0:NO = 0:SE = 41:S 
0 = 44 

48439 RETURN 

48448 REM *** STANZA NUMERO 44 

40443 PRINT "I TUNNELS TI HtfHO CONFUSO LA TESTA!!NONUS 
GIRAI MAI VIVO DA QUI ! ! 

48448 N = 43:E = 43:S = 8:0 = 0:NE = 43:N0 = 45:SE = 8:S 
0 = 8 

40449 RETURN 

48458 REM *** STMZA NUMERO 45 

48453 PRINT "I TUNNELS TI KWO CONFUSO LA TESTA! !NONUS 
CIRAI MAI VIVO DA QUI!! 

40458 N = 44:E = 43:S = 44:0 = 44:NE = 46:N0 = 44:SE = 4 
4:SO = 8 

40459 RETURN 

40468 REM *** STANZA NUMERO 46 

40463 PRINT M TUNNELS TI HAWO CONFUSO LA TESTA! !NONUS 
CIRAI MAI VIVO DA QUI!! 

48468 N = 45:E = 43:S = 43:0 = 44:NE = 47:N0 = 44:SE = 4 
3 : SO = 45 

48469 RETURN 

48478 REM *** STANZA NUMERO 47 

48473 PRINT "I TUNNELS TI HtfNO CONFUSO LA TESTA!JNONUS 
CIRAI mi VIVO DA QUI!! 


48478 N = 67:E = 43:S = 43:0 = 46:NE = 43:N0 = 46:SE = 4 
3 : SO = 46 

40479 RETURN 

40480 REM *** STANZA NUMERO 48 

40483 PRINT 'SEI ALL'STIRATA DI UNO SPLENDIDO CA 
STELLO.E' LA DIMORA DEL SAGGIO RALPH, IL MAGO CHE T 
uno SA E Timo HA.SOLO LUIftt IL POTÉRE DI FARTI TO 
RNARE A CASA A SPOSARE LA DOLCE BRUNILDE.... 

40488 N = 40:E = 0:S = 49:0 = 8:NE = 8:N0 = 0:SE = 0:SO = 
8 

48489 RETURN 

40490 REM *** STANZA NUMERO 49 

40493 PRINT 'SEI A NORD IN FONDO ALLA MAESTOSA SALA. DI 
PINTI RARISSIMI E BELLISSIMI SONO APPESI AI MUR 
I.QUESTO MGO SEMBRA SICURODEL FATTO SUO.... 

48498 N - 48:E = 0:S = 58:0 = 0:NE = 0:NO = 0:SE = 0:SO = 
8 

48499 RETURN 

40508 REM *** STANZA NUMERO 58 

40503 PRINT 'SEI NEL MEZZO DELLA SALA. LA PORTA ALLA TU 
A DESTRA INTRODUCE NELLA STANZA BLU. QUELLA ALLA T 
UA SINISTRA PORTA NELLA STMZA VÉRDE. 

48588 N = 49:E = 51:S = 53:0 = 52:NE = 0:NO = 8:SE = 8:S 
0 = 8 

48589 RETURN 

40518 REM *** STANZA NUMERO 51 

40513 PRINT 'SEI NELLA STANZA BLU. TI ASSALE UN GRM SE 
NSO DI DEPRESSIONE: SEI LONTMO DALLA DOLCE BRUNILD 
E E FORSE NON LA RIVEDRAI PIU'. COME VORRESTI ESSE 
RE A CASA. 

48518 N = 8:E = 0:S = 8:0 = 58:NE = 0:N0 = 0:SE = 0:SO = 

8 

40519 RETURN 

40520 REM *** STANZA NUMERO 52 

40523 PRINT “SEI NELLA STANZA VERDE.TI ASSALE UN GRANSE 
NSO DI GELOSIA NEI CONFRONTI DEL MGO E DEL SUO CAS 
TELLO. COME PUÒ" LUI AVERE TUTTO CIO' MENTRE TU VIV 
I IN UN BUCO?!’ 

48528 N = 8:E = 58:S = 0:0 = 8:NE = 8:N0 = 8:SE = 0:SO = 

8 

48529 RETURN 

48538 REM *** STANZA NUMERO 53 

48533 PRINT “SEI ORA A SUD DELLA GRANDE SALA. CO 

RRIDOI PORTANO A NORD. EST E A OVEST. 

40538 N = 50:E = 54:S = 8:6 = 61:NE = 8:N0 = 8:SE = 0:SO 
= 0 

40539 RETURN 

40548 REM *** STM2A NUMERO 54 

48543 PRINT "SEI NEL MEZZO DELIA SALA EST. UNTOPO ZA 
MPETTANDO VELOCEMENTE TI SI AVVICINA ETI MORDE UN P 
OLPACCIO. IN UN ISTANTE SPARISCE CON UNO STRMO 


VERB$ verbo del comado del gio¬ 
catore. 

O contiene il numero di stanza a 
ovest dalla precedente. 

Definizioni 
delle subroutine 

0000-0999 centro del programma, 
chiama le maggiori routine. 

1000-1999 titoli. 

2000-2999 dimensionamento vettori 
e lista degli oggetti definiti in DATA. 

3000-3099 routine centrale di gioco. 

3100-3199 descrizione stanze e mo¬ 
vimento interno a esse. 

3200-3299 oggetti presenti nella 
stanza. 

4000-4099 routine che controlla i co¬ 
mandi del giocatore. 

4100-4199 trova la prossima parola 
in una linea di comando. 


5000-5199 conseguenza del coman¬ 
do e del verbo, scrive COSA?? se non 
capisce. 

6000 6999 lascia che il giocatore si 
sposti da stanza in stanza. 

7000-7999 subroutine GET; verifica 
che l’oggetto desiderato esista, che sia 
nella stessa stanza e che possa essere 
preso. 

8000-8999 subroutine DROP; veri¬ 
fica che l’oggetto sia effettivamente in 
mano al giocatore; se il giocatore la¬ 
scia l’acqua vicino alla strega gli viene 
dato il bastone. 

9000-9999 inventario. 

10000-10999 routine di rottura. 

11000-11999 routine di salto. 

12000-12099 routine di ralph;il pri¬ 
mo incontro. 

12100-12199 routine di ralph;il se¬ 
condo incontro. 

13000-13999 comando IN. 


14000-14999 comando OUT. 

15000-15999 aiuto. 

16000-16999 fine gioco su richiesta 
del giocatore. 

40000-49999 descrizione stanza. 

50000-51000 routine parolaccia. 

I cambi e le modifiche 

Come tutti i programmi, anche Fuo¬ 
cofatuo può essere modificato, accor¬ 
ciato o allungato. Molte routine pos¬ 
sono essere riunite insieme,e molte 
possono essere aggiunte. Ecco qual¬ 
che suggerimento: la prima cosa che si 
può fare e compattare il programma 
dato che é più lungo del necessario. 
Per esempio, il testo in fondo al pro¬ 
gramma richiede moltissima memo¬ 
ria; con altre aggiunte si correrebbe il 
rischio di uscire fuori di memoria. Una 
soluzione potrebbe essere quella di 
immagazzinare tutte le descrizioni su 
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VERSO. 

49548 N = 0:E = 55:S = 0:0 = 53:NE = 0:NO = 8:SE = 0:SO = 
0 

40549 RETURN 

40558 REM *** STANZA NUMERO 55 
40553 PRINT “SEI ALLA FINE DELLA SALA EST. L'UNICO PA 
SSAGGIO E' UNA PICCOLA USCITA PER I SERVI A SUDES 
T. 

40558 N = 0:E = 0:S = 8:0 = 54:NE = 8:N0 = 8:SE = 56:SQ = 
0 

40559 RETURN 

48568 REM *** STANZA NUMERO 56 
40563 PRINT “SEI NELLA AREA DEI SERVI. SICCOME L' 
ULTIMO SERVO DI RALPH E' MORTO PIU 7 DINOVECENTO ANN 
I FA. IL POSTO APPARE PIUTTOSTO IN DISORDINE E 
ALQUANTO PUZZOLENTE. 

40568 N = 0:E = 0:S = 0:0 = 57:NE = 55:N0 = 0:SE = 8:S0 = 
0 

40569 RETURN 

40570 REM *** STANZA NUMERO 57 

40573 PRINT 'SEI AL DI FUORI DELL'AREA DEI SERVI.UN PE 
NOSO ODORE VIENE DA EST. E' MEGLIO ANDARE A OVES 
T SE VUOI SALVARE IL TUO MSINO DELICATO' 

48578 N = 0:E = 56:S = 8:0 = 58:NE = 0:NO = 0:SE = 8:S0 = 
0 

40579 RETURN 

48580 REM *** STANZA NUMERO 58 
48583 PRINT 8 SEI NEL MEZZO DELLA SALA SUD. UNA STRtfttLU 
CE VIENE DA OVEST RIEMPIENDO L'ARIA INSIEME AD UN 
A BELLA MUSICA. 

40588 N = 0:E = 57:S = 8:0 = 59:NE = 0:NO = 0:SE = 0:SO = 
0 

40589 RETURN 

40598 REM *** STMZA NiHERO 59 
40593 PRINT "SEI ALLA FINE DELLA SALA SUD. CI SONO DU 
E PICCOLI PASSAGGI:UNG A NORDOVEST E L'ALTRO A SUD 
OVEST. 

48598 N = 0:E = 58:S = 0:0 = 0:NE = 8:N0 = 68:SE = 8:S0 = 
62 

48599 RETURN 

40688 REM *** STANZA NUMERO 68 
48603 PRINT 8 SEI ALLA FINE DELLA SALA OVEST. UN PI 
CCOLO PASSAGGIO CONDUCE A SUDOVEST. 

48688 N = 0:E = 61:S = 8:0 = 0:NE = 0:NO = 0:SE = 8:S0 = 
59 

pptubn 

40610 REM ‘ *** STANZA NUMERO 61 

40613 PRINT “SEI NEL MEZZO DELLA SALA OVEST.UN LARGO BU 
CO NEL PAVIMENTO RIVELA UN POZZO PROFONDO CHIL 
OMETRI. E' MEGLIO CHE TU NON VADA A VEDERE. 

48618 N = 8:E = 53:S = 0:0 = 60:NE = 8:N0 = 8:SE = 0:SQ = 
0 

40619 RETURN 

48620 REM *** STMZA NUMERO 62 
40623 PRINT "SEI IN UN PASSAGGIO VENTOSO. MENTRE PR 
OSEGUI LA STRANA MUSICA SI FA PIU' VICIM. C0M1N 
CIA A FAR FREDDO MA QUESTA POTREBBE ESSERE L'USCITA 

IMI 

48628 N = 0 : E = 59:S = 0:0 = 8:NE = 8:N0 = 63:SE = 0:SO = 
0 

40629 RETURN 

48630 REM *** STMZA NUMERO 63 
48633 PRINT "SEI VICINO A MOLTE ENTRATE,QUANTUNQUE LAST 
RANA MUSICA SEMBRI PROVENIRE DA SUD OVEST. 

40638 N = 0 : E = 0:S = 0:0 = 0:NE = 62:N0 = 0:SE = 0:SO = 
64 

48639 return 

48640 REM *** STPNZA NUMERO 64 

48643 PRINT "SEI IN UN PICCOLO ANTICAMERA. UN GRANDE PA 
SSAGGIO CONDUCE A NORD, MENTRE UN PICCOLO CORRI 
DOIO PORTA A OVEST. LA STRANA MUSICA VIENE DA N 
ORD. 

48648 N = 65:E = 8:S = 0:0 = 66:NE = 0:NO = 8:SE = 63:S0 
= 0 

40649 RETURN 

48650 REM *** STMZA NUMERO 65 

48653 PRINT “APRI LA PORTA E ENTRI NEL.GABINETTO.UN 

A RADIO TRASMETTE MUSICA PUNK (CLASH).L'EFFETTO CHE 
HA SUI POVERI MURI DEL CASTELLO E ALQUANTO STRA 
NO... 

48658 N = 0:E = 8:S = 64:0 = 8:NE = 8:N0 = 8:SE = 0:SO = 


8 

40659 RETURN 

48668 REM *** STANZA NUMERO 66 
48663 PRINT "SEI NELLA BIBLIOTECA DOVE IL BUON RALPH SI 
STA ANNOIANDO SOPRA UN VECCHIO LI8R0.LA PAROLA 'YO 
BYALB E' IMPRESSA SULLA COPERTINA DEL LIBRO. RAL 
PH E' MOLTO PRESO DALLA LETTURA DEL LIBRO. 

48668 N = 0:E = 64:S = 8:0 = 0:NE = 0:NO = 0:SE = 8:S0 = 

8 

40669 RETURN 

40678 REM *** STANZA NUMERO 67 
40673 PRINT "SEI AI CONFINI DELLA TERRA DELLA STREGA DE 
MANIACA. NON SEMBRA ESSERCI ALCUNA PRESENZA DEMO 
NIACA: QUESTO E' UN BENE PER TE POICHÉ' LA STREGA 
POTREBBE TRASFORMARTI IN UN ROSPO ANCORA PIU 
' BRUTTO Dì COME LO SEI GIÀ' ORA 1 ! 

40678 N = 68:E = 47:S = 73:0 = 8:NE = 0:NO = 8:SE = 0:SO 
= 8 

48679 RETURN 

40688 REM *« STANZA NUMERO 68 
48683 PRINT 8 CAMMINANDO VERSO NORD TROVERAI UN VE 
CCHIO TORTUOSO SENTIERO. A OVEST SI NASCONDE U 
NA GRANDE CONFUSI ONE.A SUD CI ANDREI SE VOLESSI USC 
IRE DA QUESTA TERRA, VIENI DA QUESTA PARTE SE TI 
PREMELA VITA. 

48688 N = 69 : E = 0:S = 67:0 = 70:NE = 0:NO = 0:SE = 0:SO 
= 0 

48689 RETURN 

40690 REM *** STANZA NUMERO 69 
48693 PRINT 8 C'E' UN PICCOLO.NASCOSTO E SEGRETO VE 
CCHIO SENTIERO SPORCO CHE PORTA AD OVEST DA QUI. 

A SUD SEMBRA UN PO' MEGLIOMA NON TROPPO.UNA SCRITT 
A SU UNA ROCCIA DICEs'DI QUI PER TLHTSOODST' E SEGN 
A OVEST. 

48698 N = 0:E = 0:S = 68:0 = 72:NE = 8:N0 = 0:SE = 8:S0 = 
8 

48699 RETURN 

48708 REM *** STANZA NUMERO 70 
48783 PRINT “SEI IN UN PICCOLO SPIAZZO. PER TERRA C' 
E' UN PEZ20 DI CARTA CON SU SCRITTO: 'DISSE LA CON 
FUSIONE -CHI RIESCE A USCIRVIVO SI REPUTI MOLTO FOR 
TUNATG...' 

48708 N = 70:E = 70:S = 70:0 = 70:NE = 78:N0 = 78:SE = 7 
0:SO = 74 
40789 RETURN 

48710 REM *** STANZA NUMERO 71 
40713 PRINT 8 SEI NEL MEZZO DI UN LUNGO E NOIOSO SE 
NT1 ERO CHE PORTA A NORD DA SUD.LA TUA TESTA COMINCI. 
A ALQUANTO A DOLERTI. 

40718 N = 72 : E = 8:S = 78:0 = 0:NE = 8:N0 = 0:SE = 0:SO = 
8 

40719 RETURN 

48720 REM ♦** STANZA NUMERO 72 
48723 PRINT "SEI IN INO SPIAZZO MOLTO ARTICOLATO. CI SO 
NO TRE USCITE: UNA A SUD, UNA A SUD OVEST E UNA ( 
BRUTTA E PICCOLA) A NORD. 

40728 N = 69:E = 8:S = 71:0 = 0:NE = 8:N0 = 0:SE = 0:SO = 
76 

48 7 29 RETURN 

40738 REM *** STATUA NUMERO 73 
48733 PRINT "U^^ BELLO SPIAZZO AI CONFINI SUD DELLA TE 
RRA DEL DIAVOLO TI CONCEDE ìli PO' DI SOSTA E DI RI 
POSO.CI SONO DUE SENTIERI CHE PORTALO LQNTMO. 

40738 N = 78:E = 0:S = 0:0 = 0:NE = 8:N0 = 77:SE = 0:SO = 
0 

48739 RETURN 

48748 REM *** STWZA NUMERO 74 
48743 PRINT “C'E' UN INCROCIO CON TRE SENTIERI.LA TE 
STA TI FA SEMPRE PIU' MALE.PUOI USCIRECON LA MIA BE 
NEDIZIONE SE TROVI LA VIA D'USCITA" 

48748 N = 75:E = 8:S = 78:0 = 0:NE = 78:N0 = 8:SE = 0:SO 
= 8 

40749 RETURN 

48750 REM *** STANZA NUMERO 75 
'48753 PRINT B IL TUO SENSO D'ORIENTAZIONE CESSA D'UN TR 
ATTO APPENA IL SENTIERO SVOLTA UN ANGOLO. ATTEN 
TO AI RESTI DI PIPISTRELLO ALLA TUA SINISTRA. 

48758 N = 0:E = 0:S = 74:0 = 0:NE = 0:NO = 79:SE = 0:SO = 
8 

48759 RETURN 

40760 REM *** STANZA NUMERO 76 




un file di testo ad accesso casuale. 
Questo significa rimuovere dal pro¬ 
gramma tutte quelle linee, per poi mo¬ 
dificare la routine da 3100 a 3199 in 
modo da poter accedere al desiderato 
file. Ecco invece la routine da seguire 
per aggiungere dei tesori al program¬ 
ma: va cambiata la linea 2030 in FOR 
1=1 TO 10 (questo per aggiungere un 
solo tesoro; ...TO 11 per due tesori, e 
così via), e va poi inserito alla linea 
2048 il relativo DATA per ogni tesoro 
con questo ordine: 

1- numero che indica dove il tesoro 
viene a essere collocato; 

2- il nome dell’oggetto del tesoro; 

3- la descrizione dell’oggetto. 

Ecco un esempio: 

2050 DATA 17,SMERALDO,UNO 
SMERALDO VERDE É PER TER¬ 
RA SOTTO I TUOI PIEDI 


Questo è tutto. Un’altra interessan¬ 
te opzione é quella del SAVE GIO¬ 
CO. Con ciò un giocatore può in qual¬ 
siasi momento salvare la situazione sul 
disco e riprenderla quando vorrà sen¬ 
za dover ricominciare dall’inizio. 

Un suggerimento potrebbe essere 
quello di un file di dati e salvare in esso 
ogni informazione che il programma 
ha bisogno di sapere per poi poter ri¬ 
cominciare dal punto indicato. Biso¬ 
gna, in parole povere, salvare le se¬ 
guenti variabili del programma: 
FLG%() tutte le flag di questo tipo 
perché danno la situazione nei vari 
momenti del gioco ;ITM%() tutte que¬ 
ste variabili perché danno la locazione 
degli oggetti nelle stanze ;PSMZ per¬ 
ché dice al programma in quale stanza 
si trovava il giocatore quando ha smes¬ 
so. 



A questo punto il programma ne¬ 
cessita dell’opzione aggiungere RE- 
STORE GIOCO per poter ricomin¬ 
ciare la situazione salvata precedente- 
mente. Per fare questo basta aprire il 
file di dati e leggere (READ) le varia¬ 
bili in esso contenute. ■ 


40763 PRINT “SEI NEL MEZZO 01 UN LUNGO CORRIDOIO IN DI 
SCESA. NIENTE DI SPECIALE DA DIRE SE NON DELL'ODOR 
E MALSANO DI STERCO DI PIPISTRELLO. 

48768 N = 0:E = 8:S = 8:0 = 0:NE = 72:N0 = 8:SE = 8:S0 = 
79 

48769 RETURN 

48778 REM *** STANZA NUMERO 77 

48773 PRINT “SEI NEL ME220 DI UN LUNGO CORRIDOIO IN DIS 
CESA CHE PORTA A SUD. 

40778 N = 0:E = 0:S = 8:0 = 0:NE = 74:NQ = 81:SE = 73:S0 
= 0 

40779 RETURN 

48788 REM *** STANZA NUMERO 78 

40783 PRINT "IL SENTIERO E' QUI PIENO DI RESTI AB 
BASTAN2A FRESCHI DI PIPISTRELLI E ROSPI. I LORO 
CORPI IMPUTRIDISCONO NELL0SP0RC0. 

40788 N = 8:E = 0:S = 74:0 = 82:NE = 0:NO = 0:SE = 0:SO = 
0 

48789 RETURN 

40798 REM *** STANZA NUMERO 79 

40793 PRINT “SEI ALL'INCROCIO DI TRE SENTIERI:UN0 VA A 
OVEST E UNO VA A NORDEST, L'ALTRO VA ASUDEST. EHH S 
E TU AVESSI CON TE UN COMPASSO 0 UW BUSSOLA! ! 

» 

40798 N = 8 : E = 8:S = 0:0 = 83:NE = 76:N0 = 8:SE = 75:SQ 
= 8 

48799 RETURN 

48880 REM *** STANZA NUMERO 88 

48803 PRINT "SEI PRESO DA UN FORTISSIMO SENSO DI M 
USEA.APPENA CERCHI DI ORIENTARTI E DI CtftlIMRE QUA 
LC0SA TI FA CROLLARE PER TERRA:N0N RIESCI A C#HI 

NARE DIRITTO. COSA E' SUCCESSO?!? 

40888 N = 71:E = 72:S = 79:0 = 77:NE = 69:N0 = 84:SE = 7 
6 : SO = 82 

48809 RETURN 

48810 REM *♦* STANZA NUMERO 81 

40813 PRINT “AI CONFINI SUD0VEST DELLA TERRA DELLE ST 
REGHE. IL TUWEL CURVA UN POCO .ALCUNE ROCCE TI SBAR 
RANO IL PASSAGGIO. 

48818 N = 82:E = 8:S = 0:0 = 8:NE = 8:N0 = 0:SE = 77:S0 = 
0 

48819 RETURN 

48828 REM *** STANZA NUMERO 82 

40823 PRINT , Q0PPSS ,M UN GIRO IMPR0WIS0 TI OBBLIGA AD 
ANDARE 0 VERSO SUD 0 VERSO EST A SECONDA DA DO 

VE VENIVI. 

40828 N = 8:E = 78:S = 91:0= 8:NE = 0:NO = 0:SE = 0:SO = 
0 

48829 RETURN 

48838 REM *** STMZA NUMERO 83 

48833 PRINT 'UW STANZA QUI M UN'USCITA A EST E UNA A 
NORD.DA NORD PROVIENE UNO STRMO SENSODI VERTIGINE. 


48838 N = 80:E = 79:S = 0:0 = 8:NE = 0:NO = 0:SE = 8:S0 = 

0 

48839 RETURN 

40848 REM *** STANZA NUMERO 84 

48843 PRINT “SEI NELLA BRUTTA DIMORA DELLA STREGA.QUIC' 

E' LA FORNACE DOVE LEI PASSA MOLTO DELSU0 TEMPO S0G 
NANDO MACABRI CASTIGHI PER IL MGO RALPH.IL CALORE 
DELLA FORNACE BRUCIA IL TUO ANIMO. 

48848 N = 8:E = 0:S = 8:0 = 0:NE = 88:N0 = 8:SE = 0:SO = 

0 

40849 RETURN 

50880 HOME : INVERSE : PRINT “COSA !!!!": NQRMAL : SPEED= 
180: PRINT 'LO SAPEVO CHE SAREBBE FINITA COSI'": PRINT 
“COMUNQUE FATTI DIRE CHE SEI UN GIOCATORE 1 : SPEED= 

255: FOR X = 1 TO 500: NEXT 

50881 VTAB 12: INVERSE : PRINT “SLEALE,SCORRETTO E PER 
DI PIU' IRRITANTE': NORMAL : FOR X = 1 TO 1508: NEXT 

50899 HOME 

58180 INVERSE : PRINT 8 
•: GOTO 50180 

55088 FOR X = 1 TO 2888: NEXT : HOME : TEXT : HOME 
55188 VTAB 2: HTAB 9: INVERSE : PRINT “ASPETTA. DOVE VA 
I ?!': NORMAL : PRINT "VOGLIO tfCORA METTERTI ALLA 
PROVA CON UN GIOCO DI ABILITA'.': PRINT 'VEDIAMO 
SE TE LA SAI CAVARE ANCHE QUESTAVGLTA ' B 
55280 FOR X = 1 TO 28888: NEXT : HOME 
55300 VTAB 2: HTAB 15 
55381 PRINT 'E L I L A' 

55480 VTAB 4: HTAB 15 

55481 PRINT 'S I B I R" 

55580 VTAB 6: HTAB 15 
55501 PRINT "T A M P 0' 

55680 VTAB 8: HTAB 15 
55601 PRINT '0 T E I E' 

55780 VTAB 18: HTAB 15 
55701 PRINT *L 0 C R N' 

55710 PRINT : PRINT : PRINT : PRINT 
55758 P0KE 34.14 

55888 PRINT 'QUALE E' LA PAROLA PIU' LUNGA SCRITTA NE 
L QUADRO?? SERVENDOTI UW SOLA VOLTA DELLE LETTERE 
MESSE A DISPOSIZIONE FORMALINA PAROLA SECONDO LE IN 
DICAZIQNI DATE NELL'ESEMPIO. 8 
55858 VTAB 21: HTAB 1: PRINT D E B : VTAB 22: HTAB 1: PRINT 
•IV: VTAB 23: HTAB 1: PRINT "S I"LA PAROLA E' ' 
SEI'. ': FOR X = 1 T0 18800: NEXT : HOME 
55988 PRINT 'SE TROVI SUBITO UN PAROLONE SPEDISCI LA SO 
LUZ10NE ALLA REDAZIONE DI APPLICANDO: CORSO MONFQRT 
E 39 28122 MILANO.' 

55990 VTAB 22: HTAB 17: IWERSE : PRINT 'AUGURI 6 : NORMAL 
56800 RETURN 
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APPLCIlc non finisce qui. Se vi innamorate dell'Apple Ile, vi ri¬ 
cambierà. Dappertutto: in casa, in ufficio, da qualsiasi altra parte. 
Perchè compatto vuol anche dire trasportabile: Apple Ile sta in 
una valigetta 24 ore. 






ATI MIN COMPUTER? 


APPLE Ile ha tutto per farsi desiderare. Infatti, ha ereditato dalla 
sua famiglia, la famiglia Apple II, la più ampia libreria di programmi 
esistente, ed è dotato del mouse, un accessorio rivoluzionario che 
vi permette di lavorare in maniera semplice ed intuitiva. 





APPLE Ile: una ricchissima dote. Vi ci 
vorrà un po'di tempo per scoprire tutte 
le risorse dell’Apple Ile. Subito sarete in¬ 
cantati dal suo prezzo. E poi... Ma qui 
non c’è rimasto che lo spazio per antici¬ 
parvi le connessioni del suo pannello po¬ 
steriore: Mouse, Joystick e Paddles; Mo¬ 
dem; Visore a pannello piatto, Televiso¬ 
re e Monitor a colori RGB; Monitor; Dri¬ 
ve esterno; Stampanti e Plotter a colori. 
Apple Ile. Il computer che farà innamo¬ 
rare anche voi. 


upppkz computer 

APPLE COMPUTER S.p.A. - MILANOFIORI. PALAZZO Q8. 20089 ROZZANO (MI) 













L’Ms-Basic è un linguaggio e insieme 
un sistema operativo messo a punto dalla Microsoft 
per il Macintosh che consente di 
programmare con il Mac. Ecco come si usa, 
quali sono le sue caratteristiche, e come scoprire 
le routine segrete nascoste nella Rom. 


Un basic per Mac 


MICROSOFT 

BASIC 



1 1 Macintosh ha un suo sistema ope¬ 
rativo, già programmato. Non di¬ 
spone, come succede per la serie // con 
l’Applesoft, di un linguaggio di pro¬ 
grammazione da mettere direttamen¬ 
te a disposizione dell’utente. Bisogna 
prima caricare un altro sistema opera¬ 
tivo che permetta di istruire la macchi¬ 
na e di richiamare le routine già pre¬ 
senti airinterno della Rom. L’Ms-Ba¬ 
sic preparato dalla Microsoft è stato 
creato proprio per questo. Permette di 
accedere e utilizzare le routine che ri¬ 
siedono in Rom con le quali è possibile 
disegnare, cambiare i caratteri del te¬ 
sto, modificare la forma del cursore e 
rilevare gli spostamenti del mouse. 
L’utente è così libero di programmare 
senza essere legato ai programmi for¬ 
niti con la macchina: MacWrite e Mac¬ 
Paint. 

Come si usa 

Acceso il Macintosh e caricato in 
memoria il Microsoft Basic si procede 
ad aprire il file desiderato (in questo 
caso sarà l’Ms-Basic). Il catalog potrà 
essere fatto in diversi modi: per icone, 
per nome, per data (viene considerato 
l’ultimo aggiornamento), per quantità 
di memoria occupata e per linguaggio 
di programmazione. Selezionato e 
aperto con due click di mouse il file sul 
monitor, verranno visualizzate due fi¬ 
nestre: una stretta e lunga in basso, 
chiamata finestra dei comandi nella 
quale viene visualizzato tutto ciò che 
scriviamo (per esempio il listato di un 
programma che si stia preparando); 
l’altra, più grande al centro dello 
schermo (detta finestra di uscita), ser¬ 
ve invece per la visualizzazione del 


programma. I comandi possono essere 
inseriti sia da tastiera che da mouse 
utilizzando le voci dei menu in alto a 
sinistra dello schermo (i vari list, run, 
save e load). 

Per vedere il listato è sufficiente bat¬ 
tere List: verrà evidenziata una fine¬ 
stra sulla destra dello schermo con una 


parte del programma; a questo punto 
potete far scorrere la finestra per ve¬ 
dere altre parti di listato oppure, bat¬ 
tendo nuovamente List, potete otte¬ 
nere una seconda finestra nella quale 
far scorrere un’altra parte del listato 
che interessa (vedere figura). Per cor¬ 
reggere una linea del programma, poi, 
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é File Edit Control 


. 1 - ' —^ PICTURE.BHS . - 




□1 

List 

List 

240 LINE(0,0)-(120,120)„BF 

250 ASPECT* = .1 

260 WHILE ASPECT'<20 

270 CIRCLE(60,60),50,30„,ASPECT* 
260 ASPECT* = A SPECT** 1.4 

290 WEND 

300 RETURN 


100 DEFINT A-Z 

110 DIM A(1025> 

120GOSVB 220 

130 GET(0,0)-(I27,127),A 

140 X-0: Y-0 

150 IF M0USE(0)-0 THEN 150 

160 1F ABS(X-MOUSEO)) > 2 GOTO 160 
170 IF ABS(Y-M0USE(2)) < 3 THEN 150 
160 PUT(X,Y),A 

190 X-MOUSE(l): Y-M0USE(2) 

200 PUT(X,Y),A 

210 GOTO 150 

t"it?t x rw#i.«. w rv: 







File Edit Control 




?0 C PRINT MOUSE(O),jPRINT MOUSE<1 ) , :PR1NT MOUSE<2),:PfclNT M0USE<3) 
20 GOTO 10 


In alto, come avere in due finestre il listato del programma. Sotto, il rilevamento 
numerico delle coordinate del mouse ottenute con il listato riprodotto in basso. 


basta battere List seguito dal numero 
di riga per ritrovarla scritta nella fine¬ 
stra di comando. 

I primi comandi 

L’Ms-Basic contempla 182 parole 
riservate, alcune delle quali sono tipi¬ 
che del sistema grafico. Ha una sua 
routine di errore con 47 messaggi, 
mentre le routine residenti in Rom so¬ 
no 41 e vengono richiamate con un 


semplice Cali seguito dal nome della 
routine stessa. Le funzioni matemati¬ 
che sono 20, ed è anche possibile uti¬ 
lizzare i caratteri tipici delle lingue 
straniere. I primi semplici comandi 
con cui è possibile avere dei risultati 
immediati sono LCOPY per ottenere 
l’hard copy dello schermo su stampan¬ 
te, LPRINT per attivare la stampante, 
LLIST per stampare il listato e KILL 
per cancellare un file da disco. Esiste 


poi tutta una serie di parole riservate 
riguardanti la grafica. Con l’Ms-Basic 
è dunque possibile scrivere program¬ 
mi come con un qualsiasi altro compu¬ 
ter, ma con un vantaggio in più: la 
gestione del mouse. Possiede anche un 
suo EDITOR con AUTONUMBER, 
RENUMBER ed EDIT per la scrittu¬ 
ra e la correzione dei programmi. Ac¬ 
cetta quattro tipi di variabili: integer, a 
semplice precisione, a doppia preci¬ 
sione e stringhe. Nell’analisi del ma¬ 
nuale che accompagna l’MS-Basic si 
trovano alcune parole riservate abba¬ 
stanza interessanti per la funzione 
svolta: 

• STOP ferma il programma indican¬ 
do sul monitor BREAK e il numero di 
linea; la continuazione avviene con 
CONT. 

• SWAP effettua lo scambio dei valo¬ 
ri tra due variabili dello stesso tipo. 

• SYSTEM chiude tutti i file e ritorna 
al menu principale. È la stessa opera¬ 
zione che si ottiene con il mouse met¬ 
tendo la freccia in ARCHIVIO e sele¬ 
zionando QUIT; ora l’interprete Basic 
controlla se il programma in memoria 
non è stato salvato. In caso affermati¬ 
vo viene visualizzato un box di dialogo 
con le opzioni necessarie. 

• WHILE e WEND danno luogo a 
una ripetizione di operazioni in un 
loop fino a quando si realizza la condi¬ 
zione posta dalla domanda; nel caso 
contrario si esce. 

• VARPTR disegna figure definite 
con una matrice a punti e con dati in 
esadecimale. 

Giorgio Caironi 


Dove si trova 

Il Microsoft Basic Interpre- 
ter è questo l’esatto nome del 
Ms-Basic è un linguaggio e in¬ 
sieme un sistema operativo 
prodotto dalla Microsoft, una 
delle più importanti società 
americane che operano nel 
campo del software e dell- 
’hardware per personal com¬ 
puter. In Italia è distribuito 
dalla J-Soft e, almeno per il 
momento, è disponibile solo 
nella versione americana. La 
confezione dell’Ms-Basic con¬ 
tiene un dischetto e un ma¬ 
nuale, in inglese, di 220 pagi¬ 
ne. È in vendita presso quasi 
tutti i rivenditori autorizzati 
Apple. Il prezzo di listino è di 
328 mila lire. 
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Quanto vale un 
Flexible Disc? 



Il valore di ogni Flexible Disc è il risultato della 
integrazione tra il dischetto ed il suo contenuto. 

Il contenuto è il prodotto della vostra intelligenza, del vostro la¬ 
voro, del vostro tempo. 

Il contenuto sono i dati che servono per informarvi sull’anda¬ 
mento della vostra Azienda e per permettervi di gestirla, che ren¬ 
dono fluide le procedure del vostro ufficio, che riempiono di se¬ 
renità e di divertimento il vostro tempo libero. 

Con Memorex il contenuto del vostro Flexible Disc, sia da 8” che 
da 5” 1/4, o da 3” 1/2 è!protetto dalla tecnologia che è frutto 
di più di 25 anni di sviluppo sia dei prodotti magnetici che delle 
tecniche di registrazione e che ha permesso di raggiungere livel¬ 
li altissimi di affidabilità, durata ed uniformità della produzione. 


E importante, scegli Memorex 


Via Ciro Menotti, 14 - 20129 Milano - Telefono: 02/718551 
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A cura di Enzo Tonti 

Il secondo appuntamento con la rubrica di programmi didattici 
per insegnanti e studenti curata da Enzo Tonti, ordinario di meccanica 
razionale dell’università di Trieste, propone altri due 
esperimenti di difficile realizzazione pratica che si trasformano 
in interessanti esperienze con il personal computer. 

Si tratta della rotazione e traslazione delle figure piane e della 

somma di forze parallele. 




fscuola 


La 
sale in 


mela 

cattedra 



Sistema di forze parallele 


Si può visualizzare il centro di un sistema di forze 
parallele sotto forma numerica e grafica? 
Questo programma attraverso un cursore 
fissa la posizione e l’intensità di più forze e di... 


di Alberto Steindler 


L ? ostacolo maggiore alla diffusione 
dei personal computer nelle scuo¬ 
le di ogni ordine e grado é la mancanza 
di programmi nati appositamente per 
usi didattici: anche la più attrezzata 
delle software house non é in grado di 
aiutare quei professori che intendono 
utilizzare i piccoli elaboratori come as¬ 
sistenti nel corso delle lezioni, mentre 
i responsabili della pubblica istruzione 
cominciano soltanto oggi a porsi il pro¬ 
blema, generando negli addetti ai la¬ 
vori speranze per un prossimo futuro, 
ma lasciando anche inalterata l’attuale 
realtà. 

Appliscuola, giunta alla seconda 
puntata, vuole proprio essere un mez¬ 
zo per colmare, almeno parzialmente, 
queste lacune fornendo programmi 
specifici per le materie di insegnamen¬ 
to che meglio si adattano a essere svi¬ 
scerate da monitor e floppy disk. In 
questa iniziativa Applicando si avvale 
della collaborazione di Enzo Tonti, 
ordinario di meccanica razionale all’u¬ 
niversità di Trieste. Tonti, nato a Mi¬ 
lano nel 1935 e autore di una ventina di 
pubblicazioni di fisica e matematica, 
può essere considerato uno dei pionie¬ 
ri dell’uso scolastico del computer, che 
usa fino dal 1981. 

Per questa puntata di Appliscuola 
sono stati scelti due programmi. Uno 
permette di sommare forze parallele 
in particolare forze peso, ed è stato 
ideato da Alberto Steindler. L’altro, 
la translazione e la rotazione di una 
figura piana, ed è stato messo a punto 
da Paolo Battista. Nei prossimi nume¬ 
ri, rifacendosi alle tecniche spiegate in 
questo articolo, e introducendone di 
più evolute, Battista mostrerà la rota¬ 
zione di figure tridimensionali. 


D urante lo studio della statica si 
presenta sovente la necessità di 
sommare forze parallele, e in partico¬ 
lare forze peso. Date due o più forze 
parallele si tratta di determinare una 
sola forza equivalente, che prende il 
nome di risultante e deve giacere su 
una ben determinata retta: quella d’a¬ 


zione della risultante. Se, poi, queste 
forze possono essere ruotate di un 
uguale angolo tenendo fisso il loro 
punto di applicazione, si ottiene una 
nuova retta d’azione della risultante 
che interseca la precedente in un pun¬ 
to detto centro delle forze parallele 
(baricentro se si tratta di forze). 


■ 
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Il programma si propone di visualiz¬ 
zare la ricerca della retta d’azione del¬ 
la risultante (asse centrale) e del cen¬ 
tro delle forze parallele sfruttando uno 
dei vantaggi del personal computer: è 
la possibilità di utilizzare la grafica per 
immettere nel calcolatore valori di 
grandezze fisiche vettoriali quali for¬ 
ze, velocità, spostamenti, campi elet¬ 
trici e via dicendo. Questo risultato si 
ottiene disegnando i vettori, con il loro 
punto di applicazione, la direzione, il 
verso e l’intensità. 

Per fare un’analisi del programma 
vero e proprio, innanzitutto bisogna 
avere le idee ben chiare su ciò che ci si 
propone di fare. Vediamo quindi la 
struttura generale del programma. 

All’inizio ci deve essere una breve 
presentazione che illustri quello che il 
programma è in grado di visualizzare. 
La fase successiva sarà quella dell’in¬ 
gresso dei dati, in cui verranno usati 
due potenti mezzi quali sono la grafica 
e gli ingressi analogici (paddle) che 
daranno un’immediatezza e una chia¬ 
rezza che un ingresso numerico trami¬ 
te la tastiera non riuscirebbe a dare. I 
dati da inserire sono le coordinate dei 
punti di applicazione (tramite le due 
paddle) e i moduli delle forze (tramite 
le due freccette che si trovano sulla 
tastiera dell’Apple). Una volta acqui¬ 
siti i dati è necessario elaborarli e infi¬ 
ne presentare i risultati, cioè le coordi¬ 
nate del centro delle forze e l’asse cen¬ 
trale, sia sotto forma numerica sia sot¬ 
to forma grafica. L’ultima fase sarà 
quella della rotazione delle forze per 
dimostrare che gli assi centrali si in¬ 
contrano tutti nel medesimo punto. 

A questo punto è sufficiente dare 
un’occhiata alla parte principale del 
programma (linee dalla 100 alla 310) 
per rendersi conto della sequenza logi¬ 
ca con la quale il programma eseguirà i 
blocchi di istruzioni che realizzano le 
nostre idee iniziali. Vediamo infatti un 
insieme di chiamate a sottoprogrammi 
(GOSUB), a fianco delle quali c’è un 
commento (REM) sulla funzione 
espletata dalla subroutine chiamata. 

In questo modo il tutto risulta strut¬ 
turato come un breve programma 
principale che richiama un insieme di 
subroutine, ciascuna delle quali com¬ 
pie una funzione ben precisa: struttu¬ 
rare in questo modo un programma 
significa aumentarne enormemente la 
leggibilità e la chiarezza, cosa indi¬ 
spensabile in un programma didattico. 

Ecco un’analisi più approfondita 
delle linee del programma principale. 
Alla linea 170 c’è un’istruzione che ha 
lo scopo di far iniziare la memorizza¬ 
zione delle variabili numeriche a parti¬ 


108 

REM - 


118 

REM = 

SISTEMA 

120 

REM = 

DI N FORZE = 

130 

1 A ù 

REM = 

PARALLELE 
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150 

REM DI ALBERTO STEINDLER 

160 

REM 


178 

LOMEM: 

32768 

180 

DIM X(50),Y(58),F(50) 


le GOSUB 1809: REM PRESENTAZ I ONE 

200 GOSUB 28080: REM SCRITTURA SUBROUTINE 

210 GOSUB 27080: REM FONDO 

229 FOR KK = 8 TO 1 

238 GOSUB 2088: REM INGRESSO DATI 

248 GOSUB 11080: REM CALCOLI 

250 GOSUB 12000: REM STAMPA RISULTATI 

260 GOSUB 14000: REM GRAFICO FORZE 

270 GOSUB 28800: REM ROTAZIONE FORZE 

288 HOME : VTAB 3: PRINT ■VUOI CONTINUARE <S/N> ?" : : GET A*: PRINT Al 
298 KK = (Al = *N*) 

380 NEXT KK 
318 HOME : END 

1000 REM —-PRESENTAZIONE 

1818 TEXT : HOME : NORMAL : SPEED= 255 
1020 HTAB 12: VTAB 3: PRINT "QUESTO PROGRAMMA" 

1038 HTAB 7: VTAB 5: PRINT *E' IN GRADO DI DETERMINARE' 

1848 HTAB 6: VTAB 7: PRINT VASSE CENTRALE ED IL CENTRO* 

1058 HTAB 11: VTAB 9: PRINT "DI UN SISTEM DI N" 

1068 HTAB 12: VTAB 11: PRINT "FORZE PARALLELE* 

1078 VTAB 14: PRINT "PER OGNI FORZA BISOGM SPECIFICARE :* 

1880 VTAB 16: PRINT LE DUE COORDINATE X,Y DEL PUNTO*: VTAB 18: HTAB 3: PRINT 
•DI APPLICAZIONE USANDO LE DUE PADDLE* 

1890 VTAB 20: PRINT *- LA SUA INTENSITÀ" F USMDO LE FRECCE* 

1180 HTAB 20: VTAB 23: PRINT "< RETURN )*;: FOR K = 8 TO 1: GET Al: PRINT A 
$;:K = (Al = CHRI (13)): NEXT K 
1110 HOME : HTAB 16: VTAB 15: FLASH : PRINT ‘ATTENDI ': NORMAL 
1120 RETURN 

2008 REM-INGRESSO PADDLE 

2010 PX = . 9098:PY = .5686:A = 3:B = 4:N = 0 
2820 GOSUB 9880: REM ISTRUZIONI PADDLE 

2038 POKE 230.64: CALL 62458: POKE 238,32: CALL 62450:AA = 1: POKE 49239,0: 

POKE 49234,0: POKE 49232,0: POKE 49237,0 
2848 X = 108 :Y = 188:F = 28:XN = 100 :YN = 180 
2058 FOR KH = 0 TO 1 
2860 FOR K = 8 TO 1 
2070 GOSUB 4888: REM LEGGI PADDLES 
2888 GOSUB 5088: REM DISEGNA NEW 

2098 GOSUB 6880: REM SCAMBIA 

2100 K = <(TA = 141) ♦ (TA = 155)) 

2118 NEXT K 

2120 KH = ((TA = 155) * N ♦ (N = 49)) 

2138 GOSUB 7800: REM REGISTRA FORZA 
2140 NEXT KH 
2158 RETURN 

4888 REM-LEGGI PADDLES 

4010 XN = INT (PX * PDL (8) ♦ .5):XN = XN ♦ 3 
4820 TA = PEEK (49152): IF TA < 128 THEN 4868 
4830 POKE 49168,0 

4040 IF TA = 149 THEN F = F ♦ 1: IF F = 41 THEN F = 48 

4850 IF TA = 136 THEN f = F - 1 : IF F = 0 THEN F = 1 

4068 YN = INT (PY * PDL (1) ♦ .5):YN = YN * 43 
4870 RETURN 

5800 REM-DISEGNA NEW 
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5018 XP = XN:YP = YN:YY = YP - F 

5820 HCOLOR= 3: GOSUB 16080: REM DISEGNO VETTORI 

5038 RETURN 

6000 REM.SCAMBIA PAGINE 

6810 = NOT M: POKE 49236 t AA,8: PURE 230,64 - (32 * AA) 

6028 POKE 65,95 - (32 * AA): POKE 67,64 - (32 * AA) 

6030 POKE 68,8: POKE 61,96: POKE 62,255: POKE 63,127: POKE 64,255: POKE 66, 


6048 

6058 


7038 

7840 

9880 

9010 

9028 

9030 


9050 


9060 


PADDLE 8 


PRINT 1 - TA 


CALL 251 
RETURN 

7888 REM-REGISTRA FORZA 

7010 N = N ♦ 1:X(N) = XN - 3:Y<N) = 188 - YN:F(N) = F 
7820 POKE 230,96: GOSUB 5880: REM DISEGNA NEW 
POKE 230,64 - (32 * AA) 

RETURN 

REM-ISTRUZIONI PADDLE 

TEXT : HOME 

VTAB 5: PRINT ‘PER DESCRIVERE IL SI STB#: - : VTAB 7: PRINT 
MOVIMENTI ORIZZONTALI" 

VTAB 9: PRINT 1 - PADDLE 1 MOVIMENTI VERTICALI*: VTAB 11 
STO -> AUMENTA IL MODULO* 

VTAB 13: PRINT * - TASTO <- DIMINUISCE IL MODULO’: VTAB 15: PRINT * - 
(RETURN) FORZA SUCCESSIVA': VTAB 17: PRINT * - (ESO ULTIMA FORZA* 

HTAB 20: VTAB 23: PRINT *( RETURN >*;: FOR K = 0 TO 1: GET A*: PRINT A 
$;:K = (A$ = CHR$ (13)): NEXT K 
RETURN 

REM-INPUT NUMERICO 

10810 INPUT **;A$:OK = 1 

10028 IF A$ = " THEN OK = 0: RETURN 

10830 FOR 1 * 1 TO LEN <A$) 

10840 CI* = MID$ (Al,1,1) 

10050 OK = OK AND ((( ASC (CI$) > 47) AND ( ASC (CU) ( 58)) OR (CU = V) OR 
(CU = *♦■) OR (CU = '-*)) 

10068 NEXT I 
10870 RETURN 

11000 REM-CALCOLI 

11810 R = 8:SX = 0:SY = 8 
11828 FOR J = 1 TO N:R = R ♦ F(J) 

11040 SY = SY ♦ (F(J) * X(J) ) :SX = SX 4 (F(J) * Y(J)) 

11060 NEXT J 

11070 XO = SY / R:YO = SX / R 
11098 RETURN 

REM-RISULTATI 

TEXT : HOME 

HTAB 10: VTAB 2: PRINT 'SISTEMA DI , ;N;* FORZE* 

VTAB 5: PRINT ’ RISULTANTE = *jR;* N* 

MOMENTO STATICO X = *;SXj* N#M* 

MOMENTO STATICO Y = ';SY;" N*M B 
1 COORDINATE DEL CENTRO DELLE FORZE* 

X= * ;XO;' M* 

1 Y* B ;YO;" M* 

N = NEWTON , M = METRI* 


re dalla locazione di memoria 32768. 
L’istruzione è indispensabile dato che 
l’intenzione è quella di usare le due 
pagine grafiche previste dall’Apple 
(prima pagina da 8192 a 16383, secon¬ 
da pagina da 16384 a 24575) oltre a 
quella di utilizzare una terza zona di 
memoria che occupa le locazioni dalla 
24576 alla 32767 la cui funzione sarà 
descritta più avanti. Le variabili nu¬ 
meriche iniziano normalmente alla fi¬ 
ne del programma BASIC: nel nostro 
caso, essendo il programma piuttosto 
lungo, non c’è spazio sufficiente tra la 
fine del programma e l’inizio della pri¬ 
ma pagina grafica e bisogna farle ini¬ 
ziare proprio alla locazione 32768. 

Alla linea 180 si dimensionano i tre 
vettori di variabili che vengono utiliz¬ 
zati nel programma; X(I) e Y(I) sono 
rispettivamente l’ascissa e l’ordinata 
dell’i-esima forza, F(I) è il modulo del¬ 
la forza stessa. 

La subroutine chiamata alla linea 
200 scrive in memoria attraverso una 
serie di POKE un mini-programmino 
in linguaggio macchina che viene uti¬ 
lizzato per trasferire il contenuto della 
terza pagina grafica, sulla quale c’è 
Timmagine di fondo, alternativamen¬ 
te nella prima e nella seconda pagina 
sulle quali si disegna in modo tale da 
realizzare il movimento tramite un’a¬ 
nimazione (vedremo più avanti co¬ 
me). 


IR) fondo depositato nella terza zona 
di iiieiTior i a. 


12000 

12010 

12028 

12038 

12048 

12850 

12068 

12870 

12880 

12890 

12108 


FOR K = 0 TO 1: GET A$: PRINT 


VTAB 7: PRINT 
VTAB 9: PRINT 
VTAB 12: PRINT 
VTAB 14: PRINT 
VTAB 16: PRINT 
VTAB 18: PRINT 

HTAB 20: VTAB 23: PRINT *( RETURN > 

A$;:K = (A* = CHR* (13)): NEXT K 
12110 RETURN 

14808 REM.GRAFICO FORZE 

14018 GOSUB 27808: REM FONDO 

14028 POKE 68,0: POKE 61,96: POKE 62,255: POKE 63,127: POKE 64,255: POKE 65 
,96: POKE 66,8: POKE 67,64 
14838 CALL 251 

POKE 230,64: POKE 49239,0: POKE 49234,0: POKE 49232,0: POKE 49237,0 
FOR J = 1 TO N 

GOSUB 15880: REM CALCOLO PUNTO APPLICAZIONE 


14040 

14050 

14060 


Figura 1. Questo reticolato di punti 
viene creato nel sottoprogramma 
27.000 e depositato nella zona di 
memoria sopra la seconda pagina 
grafica. 

La subroutine chiamata alla linea 
210 serve invece a disegnare lo sfondo 
nella zona di memoria usata come ter¬ 
za pagina grafica. La linea 27010 can¬ 
cella la zona di memoria nella quale 
deve risiedere la terza pagina, mentre 
le linee dalla 27020 alla 27090 traccia¬ 
no gli assi e le suddivisioni dello scher- 
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mo che serviranno come riferimento 
negli spostamenti. 

Una caratteristica che ricorre diver¬ 
se volte in questo programma é un uso 
insolito, ma estremamente potente, 
del ciclo FOR...NEXT, come per 
esempio quello compreso tra le linee 
220 e 300. Esso simula la struttura RE- 
PEAT...UNTIL presente in altri lin¬ 
guaggi ma non nel BASIC. La variabi¬ 
le KK, indice del ciclo, viene modifica¬ 
ta airinterno del ciclo stesso, alla linea 
290; i valori che KK può assumere so¬ 
no 0 e 1 a seconda che l’espressione 
logica A$=“N” sia falsa (0) oppure 
vera (1). Di conseguenza il program¬ 
ma esce dal ciclo solamente se la strin-' 
ga A$ é uguale al carattere N, ovvero 
se KK vale 1. 

La struttura REPEAT...UNTIL 
presenta il vantaggio che nella mag¬ 
gior parte dei casi consente di evitare 
le istruzioni GOTO che appesantisco- 
no la lettura del programma e ne ral¬ 
lentano l’esecuzione. Per di più la con¬ 
dizione logica per l’uscita dal ciclo può 
essere comunque complessa (vedere 
per esempio le linee 2100,2120 o 
22080) e ciò permette di eliminare una 
serie di istruzioni IF.. .THEN concate¬ 
nate fra di loro. 

Durante tutto il programma vengo¬ 


no usate variabili il cui nome comincia 
con la lettera K quando si simula un 
REPEAT...UNTIL.Questo utilizzo 
del ciclo non solo velocizza il program¬ 
ma ma, cosa più importante, ne rende 
più chiara la lettura. 

All’interno del ciclo citato troviamo 
le chiamate alle subroutine principali 
del programma che verranno analizza¬ 
te una alla volta. 

Alla linea 1000 c’è la presentazione, 
l’unica cosa da notare è la presenza del 
REPEAT...UNTIL simulato alla li¬ 
nea 1100 per aspettare che venga pre¬ 
muto il tasto RETURN. Alla linea 
2000 inizia la subroutine di ingresso 
dei dati che essendo abbastanza com¬ 
plessa, è a sua volta suddivisa in picco¬ 
le subroutine, ciascuna delle quali ha 
una funzione più semplice. Alla linea 
2010 vengono definite alcune variabi¬ 
li: PX e PY sono due fattori di scala 
che servono a comprimere i valori for¬ 
niti dalle paddle (tra 0 e 255) ai valori 
che servono per la visualizzazione dei 
punti di applicazione sullo schermo; A 
e B sono rispettivamente la lunghezza 
e l’altezza delle freccette. Per evitare 
che il disegno dei vettori esca dallo 
schermo, imponiamo dei limiti sulle 
coordinate dei punti di applicazione e 
sulla lunghezza dei vettori. 


Se si decide, per ipotesi, che un vet¬ 
tore possa essere lungo al massimo 
quaranta puntini si deve riservare una 
fascia superiore dello schermo e una 
laterale sulla destra di almeno quaran¬ 
ta puntini. La fascia laterale è solo a 
destra perché è stato deciso di limitare 
la rotazione dei vettori tra 0 e 90 gradi 
(0, 1.57 radianti) senza per questo in¬ 
fluire sulla validità didattica del pro¬ 
gramma. Vengono poi riservate due 
fasce di larghezza pari a tre puntini 
lungo i lati inferiore e sinistro per evi¬ 
tare che il disegno delle freccette esca 
dallo schermo. 

Alla linea 2020 viene chiamata una 
subroutine che spiega come agire per 
descrivere il sistema di forze voluto. 
Le due paddle permettono di fornire 
al computer l’ascissa e l’ordinata del 
punto di applicazione mentre le due 
frecce permettono di aumentare (frec¬ 
cia verso destra) o diminuire (freccia 
verso sinistra) il modulo della forza. 
Definita la forza desiderata è suffi¬ 
ciente premere il tasto RETURN per 
memorizzarla e passare alla descrizio¬ 
ne della forza successiva. Per comuni¬ 
care al computer che abbiamo definito 
l’ultima forza si preme il tasto ESC al 
posto del RETURN. 

La linea 2030 pulisce le due pagine 
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Gruppo HtnpU^hnp : *1 primo servizio integrato per la consulenza, la vendita e l’assistenza 
hardware e software. Per vivere meglio con il computer a Roma. 


BmpuShop per essere sempre sicuri di trovare, pro¬ 
vare, acquistare i personal più nuovi, i programmi più 
versatili, gli accessori più utili. In un ambiente conforte¬ 
vole e tranquillo, nel centro di Roma, Compushop of¬ 
fre la consulenza personalizzata e l’assistenza 
informativa, anche per chi di computer non sa niente. 
Compushop: per vede¬ 
re, provare, scegliere 
Apple ME, Apple IIC, 

Apple III, Macintosh, 

Lisa, Disk drives 5”, 

8”, 3”, Hard disks, 

Monitors a colori, 

Stampanti ad aghi e a 
margherita, Tavolette 
grafiche, Coprocesso- 
ri, Interfacce seriali e 
parallele, Modems e 
accoppiatori acustici, 

Interfacce per macchi¬ 
ne da scrivere, Carta 
su modulo continuo, 

Nastri inchiostrati, 

Floppy disks, Kits puli- 
scitestina, Mobili porta- 


computers, Cassette magnetiche, Programmi per 
elaborare testi, archivi, calcoli finanziari, grafici, stati¬ 
stica, contabilità fiscale, musica, giochi, Linguaggi. 
Compushop per poter domandare tutto su tutto, per 
poter confrontare tutto con tutto, per imparare tut¬ 
to, per sapere finalmente tutto. Compushop è in 

Via Nomentana 265/ 
273, tei. 8450078. 

mini ùmpuShnp « 

prossimo centro del 
gruppo Compushop 
dove trovare la stessa 
professionalità nell’assi¬ 
stenza informativa, la 
stessa disponibilità per 
chi di computer non sa 
niente e per chi già sa 
tutto, ma vuole essere 
aggiornato su tutte le 
novità. Compushop e 
Mini Compushop: i due 
punti vendita hardware 
e software a Roma, per 
chi vuole vivere meglio 
con il computer. 




La società del gruppo Ompu^hap per 
tutti i servizi di installazione e di assisten¬ 
za d’impianto. Una struttura dinamica per 
garantire velocità di intervento e rapidi¬ 
tà di soluzioni. La certezza di assistenza 
continua per tutti i sistemi hardware e 
software. 

Roma 

Via Picco dei Tre Signori, 45 
Tel. 898238 



Il primo vero Cash & Carry del personal 
computer. Ideale per chi di computer sa 
tutto e non ha bisogno di chiedere nulla. 
Per chi vuole comprare ed andar via, per¬ 
chè il suo tempo è denaro. E perchè con 
il Cash & Carry si risparmia. 

Roma 

Via Lorenzo Bonincontri, 105/107 
Tel. 5140792 


f^cippkz computar 


Gruppo 


: il Personal a servizio completo 
telefono: (06) 857124 
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grafiche senza mostrarle, lasciando il 
puntatore di scrittura sulla prima (PO- 
KE 230,32) e lasciando in vista la se¬ 
conda. 

I due cicli FOR...NEXT che inizia¬ 
no alle linee 2050 e 2060 sono le simu¬ 
lazioni di due REPEAT...UNTIL an¬ 
nidati l’uno dentro l’altro; quello in¬ 
terno (K) realizza l’animazione, quel¬ 
lo esterno (KH) memorizza le forze 
una volta definite; le tre subroutine su 
cui si basa l’animazione sono quelle 
alle linee 4000 (leggi paddles), 5000 
(disegna new) e 6000 (scambia pagi¬ 
ne). 

La lettura delle due paddle avviene 
alle linee 4010 e 4060; si noti che le due 
letture sono piuttosto distanziate nel 
programma per evitare, come suggeri¬ 
to dal manuale Applesoft, che si in¬ 
fluenzino reciprocamente. I due valori 
letti vengono compressi secondo i fat¬ 
tori di scala e arrotondati, soluzione 
da preferirsi in questo caso al semplice 
troncamento. La lettura della tastiera 
avviene alla linea 4020 e la variabile 
TA viene caricata con il contenuto del 
buffer di tastiera; se questo è maggiore 
di 127 vuol dire che è stato premuto un 
tasto e si procede quindi all’ analisi del 
contenuto della variabile TA. Se essa 
contiene il valore 149, corrispondente 
alla freccia a destra, si aumenta il mo¬ 
dulo di un’unità; se contiene il valore 
136, freccia a sinistra, lo si diminuisce. 

È interessante ora studiare il cuore 
vero e proprio deH’animazione, ossia 
la subroutine alla linea 6000: l’anima¬ 
zione consiste nel disegnare in una pa¬ 
gina grafica nascosta mentre si fa ve¬ 
dere un’immagine già precedente- 
mente disegnata contenuta nell’altra 
pagina grafica. Se poi si dispone, come 
nel nostro caso, di una terza zona di 
memoria di dimensioni sufficiente- 
mente grandi da contenere una pagina 
grafica, si può disegnare su di essa uno 
sfondo che verrà di volta in volta tra¬ 
sferito sulle due pagine visibili. La 
commutazione per vedere ora l’una 
ora l’altra pagina grafica si effettua 
mettendo il valore 0 nelle locazioni 
49236 (per la prima) e 49237 (per la 
seconda). La locazione che ci permet¬ 
te di decidere dove deve essere effet¬ 
tuata la scrittura è invece la 230; se in 
essa c’è il valore 32 la scrittura avviene 
nella prima pagina grafica, se c’è il 
valore 64 nella seconda e se c’è il valo¬ 
re 96 nella terza. Ricordiamo che la 
terza pagina grafica non è in alcun mo¬ 
do visibile sullo schermo, ma serve so¬ 
lo come deposito per lo sfondo. 

La linea 6010 effettua le commuta¬ 
zioni tra le pagine; la variabile A A 
viene qui definita come l’opposto logi¬ 


co di se stessa: se vale 0 diventa 1, se 
vale 1 diventa 0. Infatti NOT(0)=1 e 
NOT(1)=0; ne segue che ogni volta 
che questa linea di programma viene 


eseguita, il valore di A A cambia nel 
suo opposto e di conseguenza tramite 
l’istruzione POKE 49236+AA,0 ven¬ 
gono visualizzate alternativamente la 


14870 GGSUB 16880: REM DISEGNO VETTORE 
14088 NEXT J 

14890 GOSUB 17080: REM CALCOLO CENTRO 
14188 GOSUB 18088: REM ASSE 
14118 GOSUB 19000: REM CROCETTA E ATTESA 
14120 RETURN 

15000 REM-PUNITO APPLICAZIONE 

15818 XP = X(J> ♦ 3:YP = 188 - Y(J):YY = YP - F(J) 

15840 RETURN 

16080 REM-DISEGNO VETTORI 

16010 HPLOT XP - Ì,YP - 1 TO XP + i,YP - 1 TO XP ♦ 1,YP ♦ 1 TO XP - 1,YP + 

1 TO XP - 1,YP - 1 
16028 HPLOT XP.YP - 1 TO XP,YY 
16030 XI = XP - A:Y1 = YY ♦ B:X2 = XP ♦ A 
16850 HPLOT XI,Y1 TO XP,TY TO X2,Y1 
16068 RETURN 

17000 REM-CALCOLO CENTRO 

17010 XC = XO ♦ 3:YC = 188 - YO 

17830 RETURN 

18000 REM-ASSE 

18010 FOR J = 0 TO 189 STEP 3: HPLOT XC,J: NEXT J 
18848 RETURN 

19088 REM-CROCETTA 

19018 POKE 49168,0 

19820 FOR K = 0 TO 1 

19830 HPLOT XC,YC - 3 TO XC,YC ♦ 3 

19048 HPLOT XC - 3,YC TO XC * 3,YC 

19850 HC0LGR= 3 * = NOT M 

19868 FOR J = 8 TO 50: NEXT J 

19878 K = ( PEEK (49152) > 127): POKE 49168,0 

19080 POKE 49168,8 

19090 NEXT K 

19180 HCOL0R= 3: RETURN 

28088 REM-ROTAZIONE FORZE 

28810 GOSUB 21880: REM PRESENTAZIONE ROTAZIONE 

20028 C QR KH = 8 TO 1 

28838 GOSUB 22088: REM INGRESSO ANGOLO 

20840 HTAB 16: VTAB 15: FLASH : PRINT ‘ATTENDI’: NORMAL 

20850 FOR J = 1 TO N 

28860 GOSUB 15080: REM CALCOLO PUNTO APPLICAZIONE 
28870 GOSUB 23880: REM ROTAZIONE VETTORE 
28980 GOSUB 24888: REM DISEGNO VETTORE RUOTATO 
28898 NEXT J 

20188 GOSUB 26980 REM ASSE CENTRALE 

20110 POKE 49239,0: POKE 49234,8: POKE 49232,0: POKE 49237,0 

29120 GOSUB 19008: REM CROCETTA E ATTESA 

28130 TEXT : HOME : VTAB 3: PRINT ’NUQVO ANGOLO <S/N> ?’;: GET Al: PRINT 

Al 

28148 KH = (Al = ’N") 

20158 NEXT KH 
28168 RETURN 

21880 REM-PRESENTAZIONE ROTAZIONI 

21818 TEXT : HOME 

21820 VTAB 2: PRINT ’ VERIFICHIAMO ORA CHE GLI ASSI CENTRALI’ 

21830 VTAB 4: PRINT ’ RELATIVI A DIVERSE ORIENTAZIONI’ 

21048 'VTAB 6: PRINT " DELLE FORZE SI INCONTRANO NEL CENTRO* 

21858 VTAB 8: H7AE 14: PRINT “DELLE FORZE* 

21868 'VTAB 23: HTAB 25: PRINT ’< RETURN >’ ; : FOR K = 8 TQ 1 : GEI Al: PRINT 
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prima e la seconda pagina grafica. Lo 
stesso vale per il puntatore di scrittura 
nella locazione 230 che assume il valo¬ 
re 32 se AA=1 oppure 64 se AA=0. 


Le linee 6020 e 6030 forniscono alla 
subroutine in linguaggio macchina per 
il trasferimento dello sfondo i parame¬ 
tri necessari per sapere se il trasferi¬ 


mento dev’essere effettuato sulla pri¬ 
ma o sulla seconda pagina grafica; an¬ 
che qui la variabile AA è usata con il 
medesimo significato di prima. Il tra¬ 
sferimento avviene alla linea 6040. 

Quando premiamo il tasto RE¬ 
TURN o quello ESC il programma se 
ne accorge alla linea 2100 ed esce dal 
ciclo interno per passare alla memoriz¬ 
zazione delle coordinate e del modulo 
della forza appena definita. La memo¬ 
rizzazione avviene alla subroutine “re¬ 
gistra forza” (7000) nella quale l’ascis¬ 
sa, l’ordinata e il modulo vengono in¬ 
seriti nelle variabili X(N), Y(N) e 
F(N) dopo essere passati dalle coordi¬ 
nate schermo dell’Apple al sistema di 
coordinate riferito ai nostri assi dise¬ 
gnati. 

La linea 7030 disegna la nuova forza 
sullo sfondo in modo tale che venga 
richiamata ogni volta durante le ani¬ 
mazioni successive. L’uscita dalla su¬ 
broutine di ingresso dei dati è vincola¬ 
ta al valore dell’espressione logica alla 
linea 2120, nella quale deve verificarsi 
una delle due condizioni logiche: 
(TA=155)*N oppure N=49. L’uscita 
avviene dunque solo se viene premuto 
ESC e N>1 oppure se N ha raggiunto 
il valore 49, cioè se è stata inserita la 
cinquantesima forza. 

Ottenuti tutti i dati necessari si pas¬ 
sa ai calcoli (240); la subroutine “cal¬ 
coli” (11000) fornisce il valore della 
risultante (R), del momento statico ri¬ 
spetto all’asse Y (SY), di quello rispet¬ 
to all’asse X (SX) e le coordinate del 
centro delle forze (XO,YO). 

I risultati vengono quindi visualizza¬ 
ti dalla subroutine “risultati” (12000); 
da notare che la distanza tra una cop¬ 
pia di puntini adiacenti sullo schermo 
è considerata pari a un metro per 
quanto riguarda le distanze e a un 
newton per quanto riguarda le forze. 

Alla linea 14000 inizia la subroutine 
che fornisce i risultati sotto forma gra¬ 
fica; come la subroutine di ingresso dei 
dati è anch’essa suddivisa a sua volta in 
alcune subroutine più semplici. Prima 
di tutto viene ridisegnato il fondo 
(14010) e trasferito sulla seconda pagi¬ 
na grafica (14020,14030). Successiva¬ 
mente vengono disegnati gli N vettori 
dopo aver fatto una nuova trasforma¬ 
zione per passare dalle nostre coordi¬ 
nate a quelle schermo. Alla fine ven¬ 
gono calcolate le coordinate del centro 
nel sistema di riferimento dello scher¬ 
mo e quindi vengono tracciati l’asse 
centrale e una crocetta lampeggiante 
per indicare il centro delle forze paral¬ 
lele. Qui il programma si arresta, 
aspettando che venga premuto un ta¬ 
sto (19070). 


A$:K=(A$ = CHRf < 13)): NEXT K 
210 7 8 RETURN 

22806 REM-INGRESSO ANGQlQ 

22019 0 = 2 * ATN (1) 

22020 POR K = 0 IO 1 
22030 T EXT : HOME 

22848 VTAB 5; PRINT 'ANGOLO DI ROTAZIONE (0 < ANG <= 1.57> £ 

22058 VTAB ?: HTAB 1 : : PRINT ' ANG H7AB 22: PRINT 'RAD';: HTAB 10: GOSUB 
10000 

22060 TH = VAL <A$) 

228 7 6 HTAB 22: VTAB 7: PRINT «rad' 

22088 K = ((TH < = P) * (TH > 0) * OK) 

22098 NEXT K 

22108 IF TH < .81 THEN TH = .81 
22110 RETURN 

23008 REM —.ROTAZIONE VETTORE 

23810 RX = 0:RY = YP - YY: GOSUB 25000 

23020 IF ABS (YR - YP) < =1 THEN YR = YP 
23030 XF = XR:YF = YR 

23840 RX = - A:RY = YP - YY - B: GOSUB 25000:X1 = XR:Y1 = YR 

23050 RX = A:RY = YP - YY - B: GOSUB 25080.-X2 = XR:Y2 = YR 

23060 RETURN 

24088 REM-DISEGNO VETTORE 

24010 HPLOT XP,YP TO XF,YF: HPLOT X1,Y1 TO XF,YF: HPLOT X2,Y2 TO XF,YF 
24040 RETURN 

25888 REM.ROTAZIONE 

25010 XR = RX * COS (TH) ♦ RY * SIN (TH) 

25020 YR = - RX * SIN (TH) ♦ RY * COS (TH) 

25038 XR = XR ♦ XP:YR = YP - YR 

25040 RETURN 

26000 REM--ASSE COLTRALE 

26010 IN = 4 * COS (P - TH) 

26820 h = TAN (P - TH):Q = YO - M * XO 

26040 X = ( - Q) / M: IF Q > - 3 THEN X = - 3 

26050 X = X ♦ INsY = M * X ♦ Q 

26870 XS = X ♦ 3:YS * 188 - Y 

26888 IF YS < 0 OR XS > 279 THEN RETURN 

26098 IF YS > 191 OR XS < 9 THEN 26050 

26100 HPLOT XS,YS 

26110 GOTO 26850 

27000 REM-DISEGNO FONDO 

27018 POKE 230,96: HCQL0R= 3: CALL 62450 

27828 FOR H = 1 TO 279 STEP 2: HPLOT H,188: NEXT H 

27838 FOR V = 0 TO 198 STEP 2: HPLOT 3,V: NEXT V 

27840 m H = 53 TO 279 STEP 50: HPLOT H,190 TO H.186: NEXT H 

27858 FOR V = 138 TO 8 STEP - 50: HPLOT 1,V TO 5,V: NEXT V 

27068 RESTORE : READ PU 

27070 FOR J = 1 TO PU: READ X,Y: HPLOT X,Y: NEXT J 

27080 FOR H = 13 TO 279 STEP 10: FOR V = 178 TO 0 STEP - 10: HPLOT H,V: NEXT 

V: NEXT H 

27090 FOR H = 53 TO 279 STEP 50: FOR V = 138 TO 8 STEP - 50: HPLOT H - 1,V 

TO H ♦ 1,V: HPLOT H,V - 1 TO H,V ♦ 1: NEXT V: NEXT H 

27188 RETURN 
27110 DATA 8 

27120 DATA 1,2,2,1,4,1,5,2,277,186,278,187,273,189,277,190 
28000 REM-SUBRUOTINE SPOSTA 

28818 POKE 251,160: POKE 252,0: POKE 253,76: POKE 254,44: POKE 255,254 
28820 RETURN 
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Sistema Polaroid Palette 
per diapositive immediate 35 min. 


^Per ulteriori informazioni spedite —i 
questo tagliando a: 


POLAROID (Italia) S.p.A. AP " 84 

Divisione Prodotti Industriali e 
Professionali 

Via Piave, 11 - 21051 ARCISATE (Varese) 
Tel. 0332/470031 



Il sistema Polaroid Palette è stato concepito come unità periferica per i più diffusi personal computers. 
Istogrammi, grafici, ed ogni altro tipo di elaborato può essere facilmente riprodotto nelle tonalità più sature e 
brillanti, grazie ad una scala cromatica di ben 72 colori. Il tutto in tempo reale, operando sia con schermo mono¬ 
cromo che a colori. 

Il sistema Polaroid Palette utilizza, infatti, il segnale di uscita del computer stesso e consente elabora¬ 
zioni fotografiche a colori sia su positivo (hard copy) che in diapositiva Polaroid 35 mm. 

Il sistema minimizza quindi la retinatura dello schermo, per una riproduzione fotografica accurata e 

definita. 


Il sistema Polaroid Palette è uno strumento di lavo¬ 
ro per operatori di marketing, per ricercatori, per tutti coloro 
che necessitano di un adeguato supporto visivo alle loro 
presentazioni. 


Polaroid 


"Polaroid” è un marchio registrato della Polaroid Corporation, Cambridge, Mass., USA. Polaroid 1984. 
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Si passa ora alla fase finale che si 
propone di dimostrare che gli assi cen¬ 
trali relativi a diverse orientazioni del¬ 
le forze si incontrano tutti nel medesi¬ 
mo punto e che esso è proprio il centro 
delle forze parallele. 

Nella parte principale del program¬ 
ma, alla linea 270, troviamo la chiama¬ 
ta alla subroutine “rotazione forze” al¬ 
la linea 20000. Anche questa subrouti¬ 
ne é sufficientemente complessa da 
giustificare una sua ulteriore suddivi¬ 
sione in parti più semplici; troviamo 
infatti una presentazione (21000) ed 
una serie di altri GOSUB racchiusi in 
un REPEAT...UNTIL. La subrouti¬ 
ne di ingresso del valore numerico del¬ 
l’angolo di rotazione è piuttosto inte¬ 
ressante in quanto esegue un’analisi 
completa sul dato in ingresso rifiutan¬ 
dolo se non soddisfa alcune condizio¬ 
ni. Una tale analisi dei dati in ingresso 
dovrebbe caratterizzare ogni buon 
programma evitando così che esso 
presenti situazioni d’errore dovute a 
dati assurdi. Il dato che a noi serve, 
l’angolo di rotazione, deve essere nu¬ 


I I computer permette con la sua gra¬ 
fica, la rappresentazione di un con¬ 
siderevole numero di oggetti e feno¬ 
meni: si tratta di una proprietà estre¬ 
mamente utile per la didattica, dove 


merico e compreso tra 0 e 1.57. Il con¬ 
trollo di numericità viene eseguito dal¬ 
la subroutine “input numerico” alla li¬ 
nea 10000 che riceve da tastiera la 
stringa A$ e la analizza carattere per 
carattere restituendo la variabile 
OK=0 se essa non è un numero e 
OK=l se lo é. Gli altri controlli ven¬ 
gono effettuati alla linea 22080. La ro¬ 
tazione degli N vettori è realizzata dal¬ 
le subroutine “rotazione vettore” 
(23000) e “disegno vettore” (24000). 
Per non dover scrivere molte volte le 
formule che danno la rotazione, que¬ 
ste ultime sono inserite in una subrou¬ 
tine (25000) che viene chiamata utiliz¬ 
zando le due variabili fittizie XR e YR 
nelle quali vengono messi di volta in 
volta i valori desiderati. 

L’ultima subroutine è quella relati¬ 
va al disegno dell’asse centrale 
(26000): qui l’asse viene tracciato pun¬ 
to per punto con un incremento sul¬ 
l’asse X calcolato in modo tale che la 
distanza fra i punti resti pressoché 
uguale qualunque sia l’angolo d’incli¬ 
nazione dell’asse (26010). 


spesso un’immagine vale più di molte 
righe di testo, ma anche in applicazio¬ 
ni sia professionali sia un po’ meno 
serie, come nei videogiochi. 

Una delle possibilità grafiche più in- 
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sul video una figura piana. 
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teressanti del calcolatore é certamente 
l’animazione. Questo articolo ha l’in¬ 
tento di spiegare tale tecnica tramite 
un programma molto semplice e facil¬ 
mente comprensibile che permette di 
traslare e ruotare una figura sullo 
schermo grafico del calcolatore; il mo¬ 
vimento è animato, e i comandi vengo¬ 
no dati battendo i tasti opportuni. Il 
programma è in grado di girare su uno 
dei qualsiasi computer Apple della se¬ 
rie // . Nell’intento di renderlo facil¬ 
mente traducibile per altri calcolatori, 
sono stati adottati alcuni accorgimenti 
ideati dal professor Enzo Tonti. 

Non essendo totalmente compatibi¬ 
li i vari comandi grafici dell’Apple, 
della Commodore, e di altre case, è 
stata infatti usata una particolare nu¬ 
merazione delle linee di programma. 
Quelle che funzionano sulla grande 
maggioranza dei calcolatori, riportano 
zero come ultima cifra della loro eti¬ 
chetta. Viceversa, le linee che conten¬ 
gono istruzioni incompatibili riporta¬ 
no cinque come ultima cifra. 

Attualmente l’animazione, così co- 
m’é spiegata in questo articolo, non è 
stata ancora attuata su altri calcolatori 
se non sullo ZX Spectrum (a proposito 
di quest’ultimo si veda l’articolo di Bi- 
dussi su Radio Elettronica & Compu¬ 
ter numero 9, settembre 1984). 

Il numero di punti grafici ( pixels ) 
della videata grafica è un’altro ele¬ 
mento di incompatibilità tra calcolato¬ 
ri: per esempio l’Apple ne ha 280 * 
192, lo Spectrum 256 * 192, il CBM 64 
300 * 200. In più, anche l’origine, cioè 
il punto di coordinate (0,0), spesso 
non coincide. Apple e CBM 64 l’han¬ 
no posta nell’angolo alto a sinistra del¬ 
lo schermo, con l’asse Y positivo rivol¬ 
to verso il basso mentre lo Spectrum e 
l’Olivetti l’hanno nell’angolo in basso 
a sinistra. 

Tutto ciò causa incompatibilità an¬ 
che nei vari calcoli per la grafica, a 
meno di non pararnetrizzare il pro¬ 
gramma. Compiuta tale operazione, è 
sufficiente cambiare i seguenti tre pa¬ 
rametri, riportati all’istruzione 1835, 
per risolvere il problema: 

1) NH numero di ascisse dello scher¬ 
mo ( 280 per l’Apple, 256 per lo Spec¬ 
trum, 300 per il CBM 64) 

2) NV numero di ordinate dello scher¬ 
mo ( 192 per l’Apple e lo Spectrum, 
200 per. il CBM 64 ) 

3) ZV si pone uguale a -1 sui calcolato¬ 
ri che hanno l’asse Y rivolto verso il 
basso ( Apple, CBM 64 ), a 1 per quelli 
che l’hanno verso l’alto ( Spectrum ). 
Da notare che ascisse e ordinate ven¬ 
gono contate a partire da zero: ciò si¬ 
gnifica che, per esempio, sull’Apple il 


numero massimo consentito é, rispet¬ 
tivamente, 279 e 191. Lo scopo della 
linea 1840 è proprio quello di tenere 
conto di tale situazione. Chiusa questa 
parentesi sulla traducibilità del pro¬ 
gramma, ecco la tecnica dell’anima- 
zione. Il principio, in poche parole, é 
questo: si disegna sulla pagina grafica 
nascosta, per esempio la seconda, la 
nuova posizione della figura, poi la si 
mostra; la successiva posizione verrà 


quindi tracciata sulla prima pagina 
grafica (ora non visibile), che sarà a 
sua volta fatta vedere, e così via. 

Per poter disegnare sulle pagine 
grafiche, il comando normalmente 
usato sull’Apple é HGR ( per la prima 
pagina ) o HGR 2 ( per la seconda ). 
Tale comando apre la pagina grafica, 
la pulisce, e vi indirizza il puntatore 
abilitandone la scrittura. Eseguita tale 
istruzione, ogni comando di traccia¬ 


le rem nfìmnnwìun/nwnuuiwiwi 

18h RE* 

ne REM TRASLAZIONE E ROTAZIONE 

112 REM 

114 REM DI UNA FIGURA PIANA 

116 REM 

120 rem /!f/ii//!U!///jn!n//nmuNwmn 

122 REM 

125 REM DI PAOLO BATTISTA 

126 REM 

138 SOSUB 1418; REM ISTRUZIONI 

140 REM.. 

158 REM PREPARA LE PAGINE GRAFICHE 

168 REM - 

175 POKE 238,32; CALL 62450; REM PULISCE LA PRIftt PAGINA GRAFICA 

185 POKE 238,64; CALL 62458; REM PULISCE LA SECONDA PAGINA GRAFICA 

195 POKE 49239,0; POKE 49232,0: POKE 49234,8; REM APRONO LE PAGINE GRAFICH 
E 

205 POKE 49237,8; REM MOSTRA LA SECONDA PAGINA GRAFICA 

218 REM - 

228 GOSUB 1810: REM PARAMETRI 

238 REM - 

248 REM DIMENSIONE E LEGGE LE COORDINATE DELLA FIGURA 

258 REM - 

265 DIM XV(N) ,YV(N) ,X<N) ,Y(N) ,YN(N) ,XN(N) 

270 FOR K = 1 TO N 
285 READ XV(K),YV(K) 

298 NEXT K 

388 REM.. 

310 GOSUB 1010: REM TRACCIA LA FIGURA 

320 REM . 

338 REM INGRESSO DATI DALLA TASTIERA 

348 REM.-. 

355 GET Al 

360 IF A* = D R* THEN GOSUB 818 
378 IF A* = THEN AL = AL + .05 
388 IF Al = a -' THEN AL = AL - .85 

390 IF Al = 'D B THEN XC = XC + PX: GOSUB 1810 

480 IF Al = a S a THEN XC = XC - PX: GOSUB 1818 

410 IF Al = “A" THEN YC = YC + PY: GOSUB 1810 

428 IF Al = 'B' THEN YC = YC - PY: GOSUB 1818 

430 IF Al = fi P s THEN PX = PX ♦ 1 :PY = PY ♦ ZV 

448 IF Al = “Q B THEN PX = PX - 1 : IF PX < 0 THEN PX = 0:PY = PY - ZV: IF PY 
< 0 THEN PY = 8 

455 IF Al = CHRI (27) THEN 585: REM SE PREMI (ESC) ESCE 

460 IF Al = “T THEN GOSUB 1408 

475 POKE 49239,8: POKE 49232,8: POKE 49236 ♦ (1 * IN),8 

488 GOTO 355: REM VA AL GET Al 

490 REM ****************** 

505 TEXT : HOME : END 

518 REM ****************** Listato 1 
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mento viene eseguito sulla pagina così 
indirizzata. 

Il problema é che tale tracciamento, 
così come il cancellamento preventivo 
della pagina, avviene direttamente 
sotto ai nostri occhi, causando un ef¬ 
fetto piuttosto sgradevole. 

Per evitarlo è necessario scomporre 
le operazioni che costituiscono HGR 
dando luogo alle seguenti istruzioni: 
-) POKE 49239,0: POKE 49232,0: 
POKE 49234,0 (aprono le pagine gra¬ 
fiche; l’ultimo POKE della serie chiu¬ 
de anche la finestra di testo). 

-) POKE 230,32 e POKE 230,64, che 
indirizzano il puntatore sulla prima 
( 32 ) o sulla seconda ( 64 ) pagina 
grafica. 

-) CALL 62450, che richiama una 
routine in linguaggio macchina che ef¬ 
fettua la pulitura della pagina grafica 
sulla quale si trova in quel momento 
indirizzato il puntatore. 

-) POKE 49236,0 e POKE 49237,0, 
che mostrano, senza cancellarla, la 
prima e la seconda pagina grafica. 

Tramite un’opportuna combinazio¬ 
ne di tali istruzioni è possibile realizza¬ 
re l’animazione. Per capire meglio co¬ 
me si usino, si consideri il seguente 
esempio: 


10 POKE 230,32: CALL 62450 

20 POKE 230,64: CALL 62450 

30 POKE 49239,0: POKE 49232,0: 

POKE 49234,0 

40 HCOLOR = 3 

50 FOR X = 100 TO 200 STEP 3 

60 IN = IN - 1 

70 POKE 230,32 * ( 1+IN ) 

80 CALL 62450 
90 HPLOT X,70 TO X,140 
100 POKE 49236+IN,0 
110 NEXT X 


La linea 10 indirizza il puntatore 
sulla prima pagina grafica e la cancel¬ 
la. Quest’ultimo è spesso un utile ac¬ 
corgimento per evitare di ritrovare 
vecchie figure ancora in memoria so¬ 
vrapposte alle nuove. 

La 20 è l’analoga della 10, ma per la 
seconda pagina grafica. 

La 30 apre le due pagine grafiche, 
chiudendo la finestra di testo, mentre 
la 40 stabilisce il colore bianco per ogni 
successivo tracciamento. 

La 50 individua il ciclo di sposta¬ 
mento del segmento che viene dise¬ 
gnato alla linea 90. In questo caso è 
una traslazione lungo l’asse delle ascis¬ 


se ( asse orizzontale ). La 60 definisce 
un certo indicatore IN che assume al¬ 
ternativamente i valori zero e uno. In 
questo modo è possibile rendere cicli¬ 
co l’alternarsi delle due pagine grafi¬ 
che. Quando IN è uguale a zero, infat¬ 
ti, le linee 70 e 100 riportano program¬ 
mi riferiti alla prima pagina grafica, 
quando invece IN è pari a uno si riferi¬ 
scono alla seconda. 

La linea 70 indirizza il puntatore sul¬ 
la pagina individuata da IN, mentre la 
80 la cancella, e la 90 traccia la nuova 
posizione del segmento. La 100 mo¬ 
stra la pagina grafica finora nascosta 
con la nuova posizione della figura. 

La 110, infine, fa passare al successi¬ 
vo valore dell’ascissa X, ripetendo poi 
la sequenza delle istruzioni ora viste. 

Quando si è capito il funzionamento 
di questo semplice esempio, si è in 
grado di realizzare una grande varietà 
di animazioni. 

Descrizione 
del programma 

Vediamo ora come, nel programma 
TRASLAZIONE E ROTAZIONE 
DI UNA FIGURA PIANA, nel lista¬ 
to 1, che viene pubblicato a pagina 52, 
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sono ottenute la traslazione e la rota¬ 
zione. 

Per quanto riguarda la traslazione di 
una figura piana si può affermare che 
la questione è semplicissima. Prima 
però bisogna spiegare come sono date 
le coordinate dell’oggetto. Esse ven¬ 
gono lette tramite un’istruzione 
READ ..DATA e identificate come 
XV(K), YV(K) ( K è il numero del 
vertice ). 

Come valore numerico, sono riferi¬ 
te ad un sistema di riferimento carte¬ 
siano ortogonale posto nel centro del¬ 
l’oggetto ( vedere Figura 1). Le coor¬ 
dinate di tale centro O vengono ripor¬ 
tate, per le coordinate grafiche pro¬ 
prie dello schermo, come XC ed YC e 
inizialmente vengono poste di valore 
pari al centro dello stesso ( istruzioni 
della linea 1860 ). Le coordinate nel 
sistema dello schermo sono allora date 
da: 


X(K) = XC + XV(K) * J 
Y(K) = YC + YV(K) * J * ZV 


riportate alla linea 1040. (Si tratta di 
normalissime formule di cambiamen¬ 
to di coordinate nel piano). Il parame¬ 
tro J ha la funzione di fattore di scala 
per la grandezza dell’oggetto; lo in¬ 
grandisce se viene posto maggiore di 
uno, lo rimpicciolisce se é minore di 
uno. 

La YV(K) viene moltiplicata anche 
per ZV. In caso contrario la figura 
risulterebbe ribaltata nei calcolatori 
che, come l’Apple, hanno l’asse Y ri¬ 
volto verso il basso. 

Da tutto questo si vede che, per tra¬ 
slare la figura, orizzontalmente o ver¬ 
ticalmente, basta incrementare la XC 
o la YC. Il passo PY di traslazione 
verticale é moltiplicato per ZV per lo 
stesso motivo che si ha per le coordina¬ 
te YV(K). Se venisse posto come PX, 
positivo, sull’Apple la figura si sposte¬ 
rebbe verticalmente in verso opposto 
a quello desiderato. 

Per la rotazione il procedimento è 
leggermente più complicato, perché si 
devono avere perlomeno delle sempli¬ 
ci conoscenze di trigonometria. Per 
capire come si possano ottenere delle 
formule per la rotazione dell’oggetto, 
si consideri la Figura 2. 

P è la posizione di un punto nel pia¬ 
no. La sua distanza da O, centro del 
sistema di riferimento XY e polo della 
nostra rotazione, sia R. La posizione 
di P può allora essere individuata dalle 
seguenti coordinate cartesiane: 


X = R * COS(TO) 
Y = R * SIN(TO) 


con T0 angolo tra il segmento OP e 
l’asse delle X. Ruotando di un angolo 
T attorno al polo O, la nuova posizio¬ 
ne di P è P’ ; la distanza OP’ è ancora 
R. Le coordinate di P’ sono invece: 


X’ = R*COS(T+TO) = R* COS(T) * 
COS(TO) - R * SIN(T) * SIN(TO) 


Y’ = R * SIN(T+T0) = R * SIN(T) * 
COS(TO) + R * COS(T) * SIN(TO) 


cioè: 

X’ = X * COS(T) - Y * SIN(T) 
Y’ = X * SIN(T) + Y * COS(T) 


che sono proprio le formule usate per 
la rotazione nel programma. Esse ven¬ 
gono riportate alla linea 850 e applica¬ 
te a ogni vertice, in modo da avere 
individuata la nuova posizione della 
figura rispetto al sistema di riferimen¬ 
to solidale al centro della stessa. Tale 
centro, per le proprietà delle rotazio¬ 
ni, ha posizione invariata. 

La linea 860 riporta come coordina¬ 
te XV(K) e YV(K) cioè le nuove così 
calcolate; in questo modo le successive 
traslazioni avverranno sulla figura 
ruotata. 


800 REM - 

810 REM ISTRUZIONI PER LA ROTAZIONE 

820 REM - 

830 C= COS (AL):S = SIN (AL) 

840 FOR K = 1 TO N 

850 XNdO = XV(K) * C - YV(K) * S:YN(K) = XV(K) * S ♦ YV(iO * C 
860 XV(K) = XN(K):YV(K) = YN(K) 

870 NEXT K 

880 GOSUB 1810; REM TRACCIA LA FIGURA 
890 RETURN 

1000 REM - 

1810 REM CALCOLO DEI PUNTI PER LA GRAFICA 

1028 REM - 

1030 FOR K = 1 TO N 

1048 X(K) = XV(K) * J + XC:Y(K> = YV(K) * ZV * J + YC 
1050 NEXT K 

1860 REM - 

1878 REM PROTEZIONI CONTRO L'USCITA DAL CAMPO GRAFICO 

1080 REM - 

1098 FOR K = 1 TO N 

1180 1F X(K) > MI THEN XC = XC - PX: RETURN 
1110 IF X(K) < 8 ^EN XC = XC ♦ PX; RETURN 
1120 IF Y(K) < 0 THEN YC = YC ♦ ZV * PY: RETURN 
1130 IF Y(K) ) W THEN YC = YC - ZV * PY: RETURN 
1140 NEXT K 

1158 REM--- 

1160 REM DISEGNO DELLA NUOVA POSIZIONE 
1170 REM - 

1185 POKE 238,32 * (1 ♦ IN): CALL 62450: REM ABILITA LA SCRITTURA SULLA PA 
GINA NASCOSTA E LA CANCELLA 
1195 HC0L0R= 3: REM COLORE BIWCO 

1285 HPLOT 0,0 TO 8,191 TO 279,191 TO 279,0 TO 0,8: REM TRACCIA IL RIQUADR 
0 DELLO SCHERMO 
1210 FOR K = 1 TO N - 1 
1225 HPLOT X(K),Y(K) TO X<K ♦ 1),Y(K ♦ 1) 

1238 NEXT K 

1245 POKE 49236 ♦ IN,8: REM MOSTRA LA PAGINA GRAFICA NASCOSTA 
1258 IN = 1 - IN: REM CAMBIA IL VALORE DELL'INDICATORE 
1260 RETURN 
1488 REM 

1410 REM VISUALIZZA ISTRUZIONI E PASSI DI TRASLAZIONE E ROTAZIONE 
1428 REM 

Listato 2. 
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relativo sistema di riferimento. 



o x 1 x ir 

Figura 2. Parametri per la rotazione 
di una sagoma. 


Spiegate queste particolarità tecni¬ 
che, si può passare alla spiegazone del 
listato del programma. Esso contiene 
un abbondante numero di REMarks, 
tanto che, tra gli stessi e quanto detto 
finora, non dovrebbero esserci proble¬ 
mi per capire il funzionamento di tale 
programma. Mi limito dunque a spie¬ 
garne le linee generali. 

Può essere diviso in due parti: pro¬ 
gramma principale ( main program ) e 
sottoprogrammi ( subroutines ). Que¬ 
sto sistema costituisce un principio che 
è seguito in un gran numero di pro¬ 
grammi professionali, e al quale è be¬ 
ne, quando possibile, attenersi. Si ot¬ 
tengono così listati più facilmente leg¬ 
gibili, oltre a una maggiore facilità nel¬ 
la correzione degli errori. Il program¬ 
ma principale va dall’inizio del pro¬ 


gramma alla linea 505 e gestisce i se¬ 
guenti quattro sottoprogrammi. 

1. Va dalla linea 810 alla 890, e calcola 
la rotazione della figura. 

2. Dalla linea 1010 alla 1260. Contiene 
tutte le istruzoni per i calcoli delle 


coordinate grafiche della figura, le 
protezioni contro-^o sconfinamento 
dalla zona grafica, e il tracciamento 
della nuova posizione. Un piccolo 
consiglio è quello di fare sempre uso 
delle protezioni quando si lavori con la 
grafica. Capita infatti molto spesso di 
causare un “illegal quantity error” per 
avere usato un’ascissa o un’ordinata 
troppo piccole o troppo grandi rispet¬ 
to a quelle consentite dalla propria pa¬ 
gina grafica. Nel caso che stiamo con¬ 
siderando, se un punto cade fuori dal 
campo lecito, la figura viene lasciata 
fissa nella posizione precedente. 

3. Dalla linea 1410 alla 1640. Visualiz¬ 
za le istruzioni. 

4. Dalla linea 1810 alla 1930. Contiene 
tutti i parametri utili per lo schermo. 
Ho ritenuto opportuno riunirli in un 
sottoprogramma, anche se viene usato 
un’unica volta, per rendere più leggi¬ 
bile il programma principale. 

C’è ancora un’avvertenza da dare su 
questo sistema. I sottoprogrammi ven¬ 
gono richiamati tramite un’istruzione 
GOSUB, e il numero al quale essa si 
riferisce viene cercato dal calcolatore 
partendo dalla prima linea di pro¬ 
gramma. Quando si ha a che fare con 
programmi molto lunghi conviene in¬ 
vertire la disposizione tra programma 
principale e sottoprogrammi. Posto il 
primo alla fine del listato, le subrouti¬ 
nes verranno richiamate molto più ve¬ 
locemente. Infine due parole sull’in¬ 
gresso usato per dare i comandi nel 
programma; tale parte va dalla linea 
330 alla 480. Come ingresso è usata la 
tastiera; viene richiesto un carattere 
tramite un GET A$. Tale A$ viene 
quindi controllato con una serie di 
istruzioni IF... THEN e se una delle 
condizioni prestabilite è verificata, il 
comando corrispondente viene ese¬ 
guito. 

La figura data nel programma rap¬ 
presenta un semplice bilanciere ma 
può facilmente essere cambiata modi¬ 
ficando le coordinate nel DATA, e, se 
necessario, le istruzioni 'h tracciamen¬ 
to HPLOT e l’indicatore N del nume¬ 
ro dei vertici della figura. j| 


1435 TEXT : HOME 

1440 PRINT "PER SPOSTARE LA FIGURA PREMERE: 8 

1455 PRIMI : HTAB 10: PRINT B A - ALTO 8 

1465 PRINT : HTAB 10: PRINT 8 B - BASSO 

1475 PRINT : HTAB 10: PRINT 8 S - SINISTRA 8 

1485 PRINT : HTAB 10: PRINT 8 D - DESTRA 8 

1490 PRINT : PRINT "PER DIMINUIRE IL PASSO PREMERE Q, 8 

1508 PRINT : PRINT ‘PER AUMENTARLO PREMERE P 8 

1510 PRINT : PRINT 8 PER VISUALIZZARE ISTRUZIONI E PASSO: 8 

1520 PRINT : PRINT “PREMERE T 

1530 PRINT : PRINT 8 PER FINIRE PREMERE <ESC> 8 

1540 PRINT : PRINT ‘PASSO ATTUALE : 8 ;PX 

1555 GET B$ 

1565 HOME 

1578 PRINT “PER ESEGUIRE LE ROTAZIONI PREMERE R; 

1588 PRINT : PRINT 8 PER AUMENTARE L'ANGOLO DI ROTAZIONE: 8 

1598 PRINT : PRINT ‘PREMERE <♦> ; 8 

1688 PRINT : PRINT "PER DIMINUIRE L'MGOLO DI ROTAZIONE: 8 

1610 PRINT : PRINT ‘PREMERE <-> ; 8 

1620 PRINT : PRINT "ANGOLO ATTUALE: 8 :AL 

1635 GET 8$ 

1648 RETURN 

1808 REM . 

1818 REM PARAMETRI DELLO SCHERMO GRAFICO 

1820 REM..--- 

1835 NH = 288:NV = 192:ZV = - 1: REM PARAMETRI DA CAMBIARE 
1840 HM = NH - 1 :VM = W - 1 

1850 Y8 = (1 - ZV> / 2 * W 

1860 XC = HM / 2:YC = Y0 ♦ ZV * INT / 2): REM COORDINATE DEL CENTRO DE 

LLO SCHERMO 

1870 N = 13: REM NUMERO DI VERTICI DELLA FIGURA 
1880 J = 3: REM FATTORE MOLTIPLICATIVO DELLE COORDINATE 
1890 PX = 4: REM PASSO DI TRASLAZIONE SULLE X 
1900 PY = ZV *4: REM PASSO DI TRASLAZIONE SULLE Y 
1918 AL = .4: REM ANGOLO DI ROTAZIONE 

1928 IN = 0: REM VALORE INIZIALE DELL'INDICATORE DELLA PAGINA GRAFICA 
1938 RETURN 

2800 REM - 

2010 REM COORDINATE DEI VERTICI DELLA FIGURA 
2028 REM - 

2835 DATA -13,-6,,-6 f -7,-3,7,-3,7 , -ó , 13,-6,13,ò , 7,6, 7 ,3,-7,3 , -7 f 6,-13,ó f - 
13,-6 
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EEB 

RHONE POULENC SYSTEMES 




IL CUORE DI "RHONE POULENC'' 

È LA CHIMICA 

Senza la Chimica non potrebbero esistere 
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La regola della gerarchia, quella della sequenza e quella 
ìy' dell’ombra servono per visualizzare il parentado. Ma il quinto 
appuntamento con il corso del Pascal spiega anche perché un 
programma si comincia dal basso, perché le funzioni sono 
macchine virtuali a una sola uscita, perché... 

Qui funziona 
anche il parente 


N ella puntata precedente è stato af¬ 
frontato il problema dei costrutto¬ 
ri e quello del loro utilizzo nella strut¬ 
tura dei dati in Pascal. Prima di passa¬ 
re ad analizzare le diverse procedure, 
le funzioni e i loro legami alle regole di 
visibilità (o scope rules), è utile avere 
ben chiara la classifica dei tipi (in rife¬ 
rimento alla Figura 2). 

I tipi strutturali predefiniti nel Pa¬ 
scal Apple sono due, STRING e 
TEXT. Il tipo string denota una strin¬ 
ga di caratteri ed è un tipo predefinito, 
anche se potremmo immaginarlo così: 

TYPE STRING = PACKED AR¬ 
RAY <0..80> OF CHAR. 

La zeresima componente contiene 
la lunghezza attuale della stringa (co¬ 
dificata come carattere). 

Se per esempio la variabile S è di 
tipo STRING e scriviamo S: 
=’CIAO’, allora lo zeresimo carattere 
conterrebbe 4 (o meglio CHR (4)) es¬ 
sendo CIAO lunga quattro caratteri. 

Se abbiamo problemi di memoria 
possiamo far allocare meno di 81 ca¬ 
ratteri per una stringa: scrivendo 
STRING [20] o STRING [15] o 
STRING [1] faremo allocare rispetti¬ 
vamente 21,16 e 2 caratteri (quello in 
più è il carattere che contiene la lun¬ 
ghezza). 

Il tipo TEXT denota un testo. Pos¬ 
siamo immaginarlo come se fosse defi¬ 
nito così: 

TYPE TEXT = PACKED FILE 
OF CHAR. 

I tipi strutturati definiti da program¬ 
ma (vedi Figura 2) si possono costruire 
per mezzo delle procedure e funzioni. 
Si vedrà più avanti che possono consi¬ 
derarsi come macchine virtuali. 

In Figura 3 si può vedere come si 


possono combinare a piacere i costrut¬ 
tori per formare strutture anche molto 
complesse. 

Ecco ora il nuovo argomento. 

Si supponga di aver voglia di fare 
una partita a scacchi e di avere a dispo¬ 
sizione una macchina che sa giocare: 
nessuno ci potrà vietare una bella par¬ 
tita! Si supponga, invece, di avere una 
macchina che non sa giocare una parti¬ 
ta intera, ma che è in grado di effettua¬ 
re una singola mossa. Se quest’ultima 
macchina è programmabile, basterà 
istruirla opportunamente per renderla 
capace di giocare. Il programma ne¬ 
cessario potrebbe essere quello rap¬ 


presentato in Figura 4. 

A questo punto la macchina reale, 
cioè quella che sapeva calcolare solo 
una mossa, è diventata una macchina 
virtuale in grado di giocare un’intera 
partita (vedere Figura 1). Questo con¬ 
cetto può essere generalizzato così: se 
non si possiede la macchina di cui si ha 
bisogno, è sempre possibile costruirla 
utilizzando macchinette più semplici e 
scrivendo un programma che esprima 
come tali macchinette vanno combina¬ 
te, al fine di effettuare l’operazione 
che desideriamo. 

E quando vengono a mancare anche 
le macchinette? Niente paura! È possi- 


PROGRAMMA SCACCHI; 

BEGIN 

REPEAT 

ACQUISISCI (MOSSAAVVERSARIA); 
CALCOLA (PROSSIMAMOSSA); 
EFFETTUA (PROSSIMAMOSSA) 
UNTIL PARTITAFINITA 
END. 



MACCHINA 

REALE 


MACCHINE 

EQUIVALENTI 


Figura 1. Una macchina virtuale. 




"Macchina che sa calcolare 
una mossa "+"programma "= 
"macchina che sa giocare a 
scacchi" 
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PREDEFINITI 




DEFINITI 
DA PROGRAMMA 



COSTRUTTORI 

PREDEFINITI 


STRUTTURATI 



PER ENUMERAZIONE 
(VUOTO, PEDONE,...) 


PER SOTTOINTERVALLO 
LUN..VEN 



PREDEFINITI 


< 


DEFINITI DA 
PROGRAMMA 


ATTRAVERSO LE 
' "MACCHINE VIRTUALI" 
(TIPI ASTRATTI) 


Figura 2. Classificazione dei tipi del Pascal. 


VAR X: FILE OF ; RECORD 

NOME COGNOME: STRINO ; 

DATA: RECORD 

GIORNO: 1..31, 

MESE : 1 . . 1 2 , 

ANNO: 1800..1900 
END 

CODICI: ARRAY Ci.. 10] OF SET OF CHAR; 
ORDINI: ARRAY C1..50] OF RECORD 

PRODOTTO: STRING 
CODICE: INTEGER 
TIPO: CHAR 
PAGATO : BOOLEAN 
END; 

SCONTO: INTEGER 
END. 

Figura 3. Esempio di innestamento dei 
costruttori. 


PROGRAM SCACCHI ; 

BEGIN 

REPEAT 

ACQUISISCI (MOSSAAVVERSARIA) ; 
CALCOLA (PROSSIMAMOSSA) ; 
EFFETTUA (PROSSIMAMOSSA) ; 

UNTIL PARTITAFINITA 
END. . 

Figura 4. Un programma che gioca a scacchi. 


bile costruirle utilizzando delle mac- 
chinettine di livello ancora più basso e 
scrivendo gli opportuni programmi 
per combinarle, fino a raggiungere un 
livello in cui la microscopica macchi¬ 
netta è una macchina esistente real¬ 
mente come, per esempio, l’Apple 
(vedere Figura 5). 

In sostanza scrivere un programma 
significa scrivere una gerarchia di pro- 
grammini che combinano man mano 
le macchine virtuali sempre di più bas¬ 
so livello: quella appena descritta è la 
programmazione per macchine virtua¬ 
li, detta anche metodologia top-down 
perché si inizia programmando mac¬ 
chine di più alto livello (top) per poi 
scendere a programmare macchine di 
livello sempre più basso (down). 

In Pascal si programma così. 

La programmazione 
di macchine virtuali 

Dalle precedenti puntate è emerso 
che un programma Pascal è diviso in 
due parti: una dedicata alle descrizioni 


e una alle istruzioni. Ebbene: le mac¬ 
chine virtuali vengono descritte nella 
prima parte (come in Figura 6) che 
serve per descrivere le risorse di un 
programma. 

Attenzione però: nel termine risor¬ 
se è raccolto tutto ciò che può servire 
alle istruzioni e, di conseguenza, va¬ 
riabili, tipi, macchine virtuali, ecc. 

Ecco come si descrive una macchina 
virtuale in Pascal. Dal discorso prece¬ 
dente è emerso che una macchina vir¬ 
tuale non è altro che una macchinetta 
virtuale corredata di un programmino: 
la struttura di una simile macchina sa¬ 
rà perciò identica alla struttura dell’in¬ 
tero programma. Vi sarà pertanto una 
parte-descrizioni, che descrive le mac¬ 
chinette, e una parte-istruzioni, che 
combina le macchinette stesse. L’uni¬ 
ca differenza è che anziché cominciare 
con la parola PROGRAM si inizia con 
la parola PROCEDURE e anziché 
terminare con un punto, si termina 
con un punto e virgola (vedere Figura" 

7) 


Ma quando finisce questo innesta¬ 
mento di macchine virtuali o, meglio, 
questo innestamento di procedure? 
Quando verrà raggiunto un livello in 
cui le istruzioni Pascal sono sufficienti 
a scrivere la parte-istruzioni senza 
aver bisogno di scrivere procedure. In 
parole povere, quando la parte- 
istruzioni è interamente espressa in 
termini di richiami di procedure pre¬ 
definite (per esempio, READ, WRI- 
TE, GET, CHR, ORD, SIN, COS, 
ecc.) e di assegnamenti. 

Nella figura 8 è possibile osservare 
un esempio pratico, in relazione al gio¬ 
co degli scacchi. Si osservi che vi sono 
più procedure in parallelo nella parte- 
descrizioni di SCACCHI: tali proce¬ 
dure sono chiamate sorelle in quanto 
tutte e quattro (ACQUISISCI, CAL¬ 
COLA, EFFETTUA, PARTITAFI- 
NITA) sono figlie di SCACCHI. In 
base a questo legame di parentela, 
CALCOLA ha due figlie, SCANDI¬ 
SCI e VALUTA, mentre a sua volta 
VALUTA ha una figlia; SCACCO- 
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MATTO. Ovviamente SCACCO¬ 
MATTO è nipotina di CALCOLA e 
pronipote di SCACCHI. 

Analogamente si parlerà di nonna e 
zia di SCACCO MATTO (rispettiva¬ 
mente CALCOLA e SCANDISCI). 

Ci sono anche i cugini e ogni sorta di 
parentela e, più in generale, vi sono 
antenati e discendenti. Una particola¬ 
re attenzione merita PARTITAFINI- 
TA: non si tratta, infatti, di una proce¬ 
dura, ma di una funzione. Si vedrà in 
seguito cosa sono le funzioni: per ora è 
sufficiente sapere che una funzione 
non è altro che una macchina-virtuale 
e che quindi va considerata alla stessa 
stregua delle procedure. 

Se ora si analizza la parte- 
descrizioni di SCACCHI si nota che 
come risorse non compaiono solo pro¬ 
cedure, ma anche tipi e variabili. Lo 
stesso succede in CALCOLA, dove è 
definita la variabile TENTATIVO. 

A questo punto viene spontaneo 
chiedersi: una risorsa descritta in una 
procedura da quali parenti è utilizzabi¬ 
le? E ancora: la variabile TENTATI¬ 
VO, per esempio, è utilizzabile in 
SCANDISCI? E in EFFETTUA? E in 
SCACCHI? Si può richiamare la pro¬ 
cedura VALUTA da ACQUISISCI? 
E da CALCOLA? E da VALUTA 
stessa? 

Le regole di visibilità 
del parentado 

Dire che una risorsa è visibile in una 
certa procedura equivale a dire che è 
utilizzabile nella sua parte-istruzioni. 


Se la risorsa è una variabile, il fatto che 
sia visibile significa che potremo asse¬ 
gnarle un valore o leggerne il contenu¬ 
to, mentre, se la risorsa è una procedu¬ 
ra o una funzione, utilizzarla significa 
richiamarla. 

Le regole di visibilità sono tre. 

1) Regola della gerarchia: una risor¬ 
sa è visibile solo aH’interno di sua ma¬ 
dre (e dei discendenti della madre), 
ma non delle antenate o delle sorelle. 
In Figura 9 (in alto a sinistra) A è 
visibile airinterno di X ma non al di 
fuori. 

2) Regola della sequenza: una risor¬ 
sa è visibile solo nella zona sottostante 
alla sua definizione. In Figura 9 (in 
alto a destra) X, pur essendo figlia del 
programma, non è visibile in tutto il 
programma, ma solo dal punto in cui 
compare in giù. 

3) Regola dell’ombra: una risorsa 
non è visibile in una zona dove è visibi¬ 
le una omonima definita più interna¬ 
mente. In Figura 9 (in basso a sinistra) 
compaiono due variabili con lo stesso 
nome A. All’interno di X è visibile la 
variabile A più interna, mentre quella 
più esterna non è visibile. 

Riassumendo, una risorsa è visibile 
se vale sia la regola 1 sia la regola 2 sia 
la regola 3, come si vede nella figura 9 
in basso a destra. 

Perché esistono queste regole? Per¬ 
ché si vuole che l’innestamento delle 
procedure non sia solo una raffinatez¬ 
za estetica ma, al contrario, che abbia 
un senso ben preciso: in sostanza, pro¬ 
grammare per macchine virtuali signi¬ 
fica che quando si scrive una procedu¬ 


ra si presuppone 1’esistenza di alcune 
macchinette che fanno altre cose, ma 
non ci si deve interessare a come que¬ 
ste macchinette sono fatte e a cosa 
hanno dentro. Si scrivono dunque le 
istruzioni che combinano queste mac¬ 
chinette, considerando queste ultime 
come scatole nere. In quest’ottica è 
ovvio che tutto ciò che sta dentro a una 
scatola nera non serve all’esterno e 
quindi ha senso il fatto che sia del tutto 
invisibile fuori dalla scatola nera. 

La regola dell’ombra ha un altro si¬ 


gnificato: due scatole nere (cioè due 
procedure) innestate possono essere 
paragonate per un attimo a due fami¬ 
glie e in ognuna di esse vi sarà una 
madre con dei figli. Supponiamo che 
due figli, di famiglie diverse, abbiano 

10 stesso nome: MARIO. È ovvio che 
se una mamma dice “MARIO, vieni 
qua!” intende chiamare suo figlio e 
non il figlio dell’altra. 

Un programma Pascal 
si comincia dal basso 

Come viene eseguito in questo con¬ 
testo un programma Pascal dal calco¬ 
latore? All’atto del lancio comincia 
l’esecuzione delle istruzioni del pro¬ 
gramma (vedere Figura 10). Quando 
si trova una chiamata di procedura, il 
controllo salta alle istruzioni della pro¬ 
cedura e quando il controllo arriva alla 
fine della procedura (cioè alla End) il 
controllo ritorna al punto di chiamata. 

11 programma termina quando il con¬ 
trollo arriva alla End, cioè alla fine del 
programma. Se vi sono richiami inne¬ 
stati, come in Figura 10, il controllo 
salta alle procedure innestate per poi 
ritornare automaticamente al punto di 
chiamata. Non è necessaria alcuna 
istruzione particolare del tipo STOP, 
JUMP o altre diavolerie. 

Nel Pascal Apple esiste lo statement 
EXIT, che permette di uscire da una 




Figura 6. Struttura di un programma 
Pascal. 
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procedura anche se non si è ancora 
arrivati alla End. 

Programmare in modo top-down (o 
per macchine virtuali) significa comin¬ 
ciare a scrivere le istruzioni più ad alto 
livello presupponendo resistenza di 
alcune macchine virtuali. Poi si passa a 


scrivere le macchine virtuali, presup¬ 
ponendo resistenza delle macchinette 
virtuali, e via dicendo. 

Osservando la Figura 7, si nota che 
ciò significa cominciare a scrivere dal 
basso o, più precisamente, prima le 
istruzioni del programma, poi le istru¬ 


zioni delle varie procedure via via più 
in alto. Analogamente, per leggere un 
programma Pascal, specialmente se 
scritto da qualcun altro, per .capire 
qualcosa bisogna prima leggere il 
main, cioè la parte-istruzioni del pro¬ 
gramma, e poi man mano risalire ver- 



parte -descrizioni 
di PI 


parte -descrizioni 
diP 


Figura 7. 

Struttura 

di un programma 

Pascal: 

è una gerarchia 
di macchine 
virtuali. 


r—PROGRAM- 




END 



REGOLA DELLA GERARCHIA : 

A E'VISIBILE SOLO NELLA 
PARTE TRATTEGGIATA E NON 
AL DI FUORI 


X E' VISIBILE SOLO NELLA 
PARTE TRATTEGGIATA E NON 
SOPRA 



REGOLA DELL'OMBRA : 
ALL'INTERNO DI X E' VISIBILE 
LA VARIABILE PIU' INTERNA 
MA NON QUELLA PIU' ESTERNA 
A CAUSA DELL'OMONIMIA . 


Figura 9. Le regole di visibilità. 


—PROGRAM 


r-PROCEDURE 


i- PROCEDURE Y 



BEGIN 


END 

COMBINAZIONE DELLE TRE REGOLE: 

La procedura X e' visibile solo 
all'interno di sua madre Y, nella 
zona sottostante alla sua definizione 
escludendo le zone in cui e’ visibile 
una omonima (nella procedura Z e' 
visibile la variabile X quindi non la 
procedura X). 
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-PROGRAM SCACCHI --- 

TYPE SCACCHIERA - - - 

VAR M0SSAAVVERSARIA.PR0SSIMAM0SSA — 
-PROCEDURE ACQUISISCI (—); - 

BEGIN 

-END; -- 

- PROCEDURE CALCOLA (—);- 

VAR TENTATIVO:— 

-PROCEDURE SCANDISCI,- 

begTìT 

- END,-:- 

-PROCEDURE VALUTA;- 

— PROCEDURE SCACCOMATTO; — 

BEG1N 

-END; -- 

BEGIN 


-END; 

BEGIN 



-PROCEDURE EFFETTUA (—);- 

PROCEDURE STAMPA, 

BE GIN 

END; 

B EGIN 

-END; -- 

-FUNCTION PARTITAFINITA : BOOLEAN ;- 

B EGIN 

-END;- 

BEGIN 

REPEAT 

ACQUISISCI (MOSSAAVVERSARIA); 

CALCOLA (PROSSIMAMOSSA); 

EFFETTUA (PROSSIMAMOSSA); 

UNTI L PARTITAFINITA 

-END.- 

Figura 8. Un programma 

che gioca a scacchi.(in versione più 

dettagliata che in figura 4). 


'so Paltò. 

Il compilatore, invece, legge il pro¬ 
gramma al contrario: parte dall’alto e 
traduce gli statement scendendo. Si 
può quindi dire che ragiona in modo 
bottom-up (è il contrario di top- 
down), cioè analizza prima il dettaglio 
(le macchine virtuali di più basso livel¬ 
lo) per passare poi al globale. 

Le risorse predefinite 

Se nelle prime puntate le procedure 
WRITE e READ venivano considera¬ 
te come istruzioni particolari, ora pos¬ 
sono essere collocate nell’ottica delle 
macchine virtuali. In sostanza, le ri¬ 
sorse predefinite (WRITE, CHR, IN- 
TEGER, STRING...) sono risorse del 
tutto analoghe a quelle definite dal 
programmatore nelle proprie proce¬ 
dure, ma sono utilizzabili senza dover¬ 
le definire. 

Un programma va dunque immagi¬ 
nato come se fosse innestato dentro 
una macchina virtuale invisibile, rap¬ 
presentata dal Pascal System. In so¬ 
stanza, il Sistema Pascal non è altro 
che l’antenato più vecchio di tutti e 
definisce (o meglio: predefinisce) al- 
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Figura 12. 
Esempio 
di funzione. 


Figura 13. 

Funzioni 

booleane. 


r 


■ NOME DELLA FUNZIONE 


t 


TIPO DELLA FUNZIONE 
PARAMETRO 


PROGRAM ESEMPIO; 

VAR X : INTEGER ;N 

FUNCTION FATT (N : INTEGER) : INTEGER ; 

VAR I,F : INTEGER ; ^ 

BEGIN 
F 1 ; 

FOR I 2 TO N DO 
F := F * I ; 

FATT := F ^- ASSEGNAMENTO DELLA FUNZIONE 

END ; 

BEGIN 


X := 1 + FATTC5) * 3 ; 

/N 


.RICHIAMO DELLA FUNZIONE IN 
UNA ESPRESSIONE 


- PROGRAM SCACCHI ; - 


-FUNCTION PARTITAFINITA : BOOLEAN ; - 

- FUNCTION VINTO ( C : COLORE ) : BOOLEAN ; 


- END ; - 


BEGIN 

PARTITAFINITA > VINTO(BIANCO) OR VINTO (NERO) 

- END ;- 


BEGIN 

REPEAT 


UNTI L PARTITAFINITA 
- END.- 


cune risorse base, come si vede in Fi¬ 
gura 11. 

Le funzioni: macchine 
virtuali a una sola uscita 

Qual è allora la differenza tra le 
procedure e le funzioni? Si può dire 
che una funzione Pascal è del tutto 
analoga a una funzione matematica 
Y=f(X). Si tratta di un ente che forni¬ 
sce uno e un solo valore come output. 
La struttura interna di una funzione è 
identica a quella delle procedure, e a 
cambiare è la modalità di richiamo. La 
Figura 12 mostra un esempio (viene 
definita la funzione fattoriale). La 
maggior parte delle funzioni matema¬ 
tiche sono predefinite (SIN, COS 
EXP, ARCTAN, ecc.). La funzione 
fattoriale, invece, non lo è e dovrà 
perciò essere definita (da ricordare 
che il fattoriale di un numero N è defi¬ 
nito così: FATT(N) = 1*2*3* ... *N- 
1*N). 


Una funzione inizia con la parola 
chiave FUNCTION, seguita dal suo 
nome (uno qualsiasi), seguito a sua 
volta da una eventuale lista di parame¬ 
tri (i parametri saranno argomento 
delle prossime puntate), seguita anco¬ 
ra da un segno di due punti e da un 
tipo. 

All’interno del corpo della funzione 
è obbligatorio almeno un assegnamen- 
to alla funzione (in Figura 12: 
FATT:=F). Ciò significa che, durante 
l’esecuzione di quella specifica funzio¬ 
ne, le verrà assegnato il valore di F. 
Una funzione viene richiamata all’in¬ 
terno di una espressione, vedi Figura 
12, X: = 1+FATT(5)*3. A differenza 
delle procedure, non esiste uno state¬ 
ment di chiamata di funzione: una 
chiamata di funzione non è altro che 
un operando di un’espressione. La Fi¬ 
gura 13 mostra un curioso uso di fun¬ 
zioni booleane. 

Alessandro Mazzetti 

5. continua 


lo applico, 
tu applichi? 


La pubblicità su 
Applicando è informazione. 
Chi legge Applicando 
possiede un computer 
Apple o sta per cambiarlo 
con un Apple//e. 

O con un Lisa. 

O con un Apple//c, Apple///. 
O con un Macintosh. 
Oppure non lo cambia 
affatto, se lo tiene stretto, 
ma vuol sapere dove, 
come e cosa fa 
veramente per lui. 

Una nuova marca 
di dischetti? 

Una nuova 
Software House? 

Una nuova stampante 
a basso prezzo? 

Per chi applica, 
è importante saperlo. 
Subito. 
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AUT. MIN. CONC. 


CHI HA VISTO 
ILI 0 PREMIO? 



È dedicato ai lettori di Radio Elettronica & Computer il concorso più 
awincente dell'anno. Compra il numero ora in edicola della rivista: 
se - con l'aiuto di un dettaglio fotografico - scopri l'identità del pre¬ 
mio misterioso, puoi vincerlo! Inoltre partecipi all'estrazione di: 1 ZX 
Spectrum 48K, 4 ZX Spectrum 16 K, 9 ZX Microdrive, 35 volumi. 












Per creare disegni, figure e 
illustrazioni in alta risoluzione 
sono sufficienti un Apple //, un televisore 
a colori e, soprattutto, qualche minuto 
per copiare il listato. Poi, 
usando la tastiera come un pennello... 


Quanti punti 
per l’artista 


luzione. La linea 10 è estremamente 
importante, e si dovrà fare attenzione 
a battere il numero esatto di lineette. 

Come si disegna 

Dopo aver digitato il package grafi¬ 
co occorre, per prima cosa, salvarlo 
sul dischetto. Attenzione, però: que¬ 
sta operazione deve essere eseguita 
prima di farlo girare perché, in caso 
contrario, modificherebbe certe sue 
porzioni per potersi ripristinare in ca¬ 
so di reset accidentali. 

Quando lo si fa girare viene visualiz¬ 
zato il menù principale e si deve batte¬ 
re l’opzione numero 1 (basta battere 
1). Lo schermo allora viene pulito e ci 
sarà un dot lampeggiante nell’angolo 
in alto a sinistra, in posizione 0,0. Si 
tratta del cursore Hi-Res. Per lo spo¬ 
stamento del cursore si osservi, guar¬ 
dando la tastiera la disposizione di 
questi tasti. 


S ono sempre più numerosi gli appli- 
sti che utilizzano il loro personal 
computer per creare immagini, utiliz¬ 
zando programmi capaci di moltiplica- 
re le capacità grafiche dell’elaborato¬ 
re. In molti casi, poi, non sono tanto le 
doti artistiche a essere privilegiate, 
quanto la necessità di produrre grafici, 
con istogrammi o figure di vario gene¬ 
re, per integrare o illustrare ricerche 
scolastiche o relazioni. Quello propo¬ 
sto in queste pagine è un programma 
di facile comprensione, che lavora in 
alta risoluzione e che consente di sal¬ 
vare su dischetto le figure, una volta 
che siano state completate e colorate. 
Naturalmente è necessario un televi¬ 
sore a colori, mentre il sistema deve 
avere l’Applesoft nella ROM e 32K. 
Ecco, in dettaglio, la spiegazione delle 
funzioni del programma. 

Il menù principale è utilizzato solo 
per cinque funzioni; al resto si accede 
direttamente mentre si disegna. Per il 
controllo di precisione del disegno il 
programma usa la tastiera. Sulle prime 
questo metodo può sembrare un po’ 
scomodo, ma, se si pensa a come pos¬ 
sano essere imprecise le paddle, i suoi 
vantaggi diventano evidenti. 

L’immissione 
del programma 

Il programma deve essere copiato 
esattamente come viene pubblicato. 
Fa ricorso a un gran numero di GO- 
SUB e il codice ripetitivo è stato ridot¬ 
to al minimo. Alla base di questa strut¬ 
tura c’è l’esigenza di tenere il pro¬ 
gramma sotto la pagina 1 dell’alta riso- 


(alto) 



RETURN 

(sinistra) «- —> (destra) 

(basso) 

/ 


Il menu principale del programma 
Apple artista^ che permette di scegliere 
tra cinque opzioni. 


Sono i tasti per lo spostamento del 
cursore, collocati in disposizione logi¬ 
ca. Return muove il cursore verso l’al¬ 
to, / lo sposta verso il basso, <— a sini¬ 
stra e —> a destra. Così, battendo il 
tasto /, si vedrà aumentare la coordi¬ 
nata y. Il dot si muove molto lenta¬ 
mente e nel contatore in basso viene 
incrementato soltanto un punto per 
volta. Da notare che non ha luogo al- 


MENU 


1- TAVOLA FIGURE 

2- CARICA FIGURA 

3- SALVA FIGURA 

4- PULISCE LO SCHERMO] 

5- FINE PROGRAMMA 


[QUALE ->5 





cun tracciamento. Per tracciare è ne¬ 
cessario battere CTRL-P. In fondo al¬ 
lo schermo verranno visualizzate e poi 
tolte le parole IL PLOTTER È INSE¬ 
RITO. A questo punto bisogna spo¬ 
stare il cursore e guardare mentre si 
disegna. Se si vuol cambiare il colore si 
prema la barra spazio e comparirà un 
menù dei colori. Non c’è che scegliere 
il colore desiderato. Se si preme acci¬ 
dentalmente la barra spazio si batta il 
numero del colore di prima. Se si vuo¬ 
le cancellare qualcosa o si deve sce¬ 
gliere il colore appropriato e ripassare 
ciò che si è disegnato, per affrettare lo 
spostamento del cursore si deve batte¬ 
re CTRL-I e introdurre un incremento 
di propria scelta (1-9). In questo modo 
si aumenterà il salto fra uno sposta¬ 
mento e il successivo. Battendo un re¬ 
turn invece di un numero si interrom¬ 
pe la richiesta di incremento e si torna 
al modo precedente, conservando im¬ 
mutata la vecchia impostazione d’in¬ 
cremento. 

Controllo dello schermo 

La sezione testo dello schermo Hi- 
Res non è stata fin qui disponibile per 
il disegno. Occorre infatti battere 
“ESC” per passare a tutto schermo ed 
“ESC” per tornare al modo misto gra¬ 
fica e testo. 

Per riempire un oggetto che si è di¬ 
segnato basta battere CTRL-R, legge¬ 
re ciò che è visualizzato e premere un 
tasto quando si è finita la lettura. Ec¬ 
co, per esempio, come si riempie lo 
schermo di blu. Si noti che il plotter è 
stato chiuso automaticamente. Per 
portarsi all’angolo in alto dello scher¬ 
mo, nella posizione (0,0), bisogna pre¬ 
mere il tasto o il ” = ” e attendere 
che il cursore venga collocato nell’an¬ 
golo in alto a sinistra. Adesso si batte 
“R” e si attende il beep, per poi pre¬ 
mere il tasto oppure ”+” e sposta¬ 
re il cursore nell’angolo opposto. Pre¬ 
mendo la barra spazio si sceglie il colo¬ 
re: basta battere ”R” e lo schermo 
diventa un oceano blu. Quando si im¬ 
piega questo modo si deve sempre ri¬ 
cordare di specificare i punti delle op¬ 
poste estremità. Questo vale anche 
per il modo di disegno delle linee e per 
quello di riquadro, che saranno de¬ 
scritti più avanti. 

Se durante il modo di riempimento 
si ha necessità di cancellare, è suffi¬ 
ciente battere CTRL-A. 

Riquadri e linee 

Il modo riquadro (cornice) funzio¬ 
na nella stessa maniera, con la diffe¬ 
renza che si ricorre a CTRL-B per im¬ 
postarlo e a B per specificare gli oppo- 


2 REM ********************* 

3 REM * APPLE ARTISTA * 

4 REM * COPYRIGHT <0 '84 * 

5 REM ♦ BY APPLICANDO 4 * 

6 REM « MICROSPARC * 

7 REM ********************* 

10 REM -FINE- 

20 LOMEM: 16386 

30 IF PEEK (2063) = 128 THEN 1500 
40 GOTO 1260: REM PARTENZA A FREDDO 
50 REM DISEGNA **** 

60 HCQLQR= HC 

70 POKE - 16297,0: P0KE - 16304,0: 60SUB 540 

80 60SUB 480 

90 GOSUB 530 

100 K = PEEK ( - 16384): IF K > 127 THEN 150 
110 IF C = 0 THEN C = 1: 60T0 130 
120 C = 0 

130 POKE 793,C: XDRAU 1 AT X,Y 
140 GOTO 100 

150 IF C = 1 THEN XDRAU 1 AT X,Y 
160 K = K - 128 

170 IF K < > 13 AND K < ) 8 AND K < ) 47 AND K < >21 THEN 220 

180 IF K = 13 THEN Y = Y - INC: GOTO 370 

190 IF K = 47 THEN Y = Y ♦ INC: GOTO 370 

200 IF K = 21 THEN X = X ♦ INC: GOTO 370 

210 IF K = 8 THEN X = X - INC: GOTO 370 

220 IF K = 12 AND LD < >1 THEN 910 

230 IF K = 9 THEN GOSUB 550: GOTO 360 

240 IF K = 43 OR K = 59 THEN X = 279:Y = 191: GOTO 370 

250 IF K = 45 OR K = 61 THEN X = 0:Y = 0: GOTO 370 

260 IF K = 76 AND LD = 1 THEN GOTO 950 

270 IF K = 82 AND FS = 1 THEN P = P + 1 : GOTO 970 

280 IF K = 1 THEN FS = 0:LD = 0:BD = 0:P = 0:LP = 0:DP = 0: GOTO 360 

290 IF K = 16 THEN GOSUB 620 

300 IF K = 17 THEN GOTO 1310 

310 IF K = 27 THEN GOSUB 660: GOTO 360 

320 IF K = 2 AND BD < >1 THEN 1160 

330 IF K = 66 AND BD = 1 THEN 1200 

335 IF K = 63 THEN GOSUB 642 

340 IF K = 32 THEN GOSUB 690: GOTO 360 

350 IF K = 18 AND FS = 0 THEN GOTO 970 

360 GOSUB 530:C = 0: POKE 793,C: GOTO 100 


Tavola delle variabili 


A$ - Richiesta di input in generale, usata in tutto il programma 

D$ - CONTROL-D per il dischetto 

Fl$ - File del dischetto cui si sta accedendo al presente 

F2$ - File del dischetto di più recente accesso 

PS$ - Condizione del plotter inserito/escluso 

A - Variabile numerica di scopo generale, usata in tutto il 

programma 

BD - Disegno riquadro, 1 inserito, 0 escluso 

E - Numero dell’errore 

FS - Riempimento, 1 inserito, 0 escluso 

HC - Colore Hi-Res che si sta usando 

INC - Impostazione corrente dell’incremento 

K - Carattere letto da tastiera , 

LD - Disegno linee, 1 inserito, 0 escluso j 

LP - Contatore disegno linee 

P - Contatore riempimento 

ST - Condizione di tutto schermo o mista della grafica 

X - Coordinata X corrente del cursore 

Y - Coordinata Y corrente del cursore 

ZZ - Variabile di uso generale, impiegata in tutto il programma 
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370 IF X > 279 THEN X = 279 

380 IF X < 0 THEN X = 0 

390 IF Y > 191 THEN Y = 191 

480 IF Y < 0 THEN Y = 0 

410 GOSUB 530 

420 IF X ) 255 THEN POKE 786,255: POKE 787,X - 255: GOTO 440 

430 POKE 786,0: POKE 787,X 

440 POKE 788,Y 

450 IF PSI = 'OFF' THEN 470 

460 HCQLOR= HC: HPLOT TO X.Y 

470 GOSUB 480:C = 0: GOTO 100 

480 X* = STRI (X): IF X < 10 THEN XI = "00* ♦ XI: GOTO 500 
490 IF X < 100 THEN XI = '0' ♦ XI 
500 Yl = STRI (Y): IF Y < 10 THEN Yl = '00' ♦ Yl: GOTO 520 
510 IF Y < 100 THEN Yl = *0" + Yl 

520 VTAB (22): HTAB (9): PRINT XI: VTAB 23: HTAB (9): PRINT Yl: RETURN 
530 POKE - 16368.0: RETURN 

540 VTAB (22): PRINT ’COORD X= HTAB 20: PRINT ,7 ? 7 = MENU 7 D'AIUTO": PRINT 'C 
OORD Y = *': RETURN 

550 POKE - 16301.0: HOME : GOSUB 530: VTAB (22): PRINT 'INTRODUCI VALORE INCREMENT 
0 )'*:RI = PSI:PS! = " 

560 GET tf:A = VAL (Al): IF A < 0 OR A > 9 THEN 560 

570 IF A = 0 THEN 590 ■ 

580 INC = A 
590 POKE 789,INC 

600 PI = 'ORA L'INCREMENTO E' ■ ♦ STRI (INC): HOME : GOSUB 650 

610 GOSUB 660: GOSUB 660: HOME : GOSUB 540: GOSUB 480:PS! = RI: RETURN 

620 POKE - 16301,0: HOME : IF PSI = 'ON' THEN PSI = 'OFF': POKE 791,0: GOTO 640 

630 PSI = 'ON': POKE 791,1 

640 PI = 'IL PLOTTER E 7 GOSUB 650: HOME : GOSUB 660: GOSUB 660: GOSUB 540: GOSUB 
530: GOSUB 480: RETURN 

642 TEXT : HOME : HTAB 13: PRINT 'MENU D 7 AIUTO 

CTRL-A INTERRUZIONE 
CTRL-B BOX 
CTRL-R RIEMPIMENTO 
CTRL-1 IMPOSTAZIONE INCREMENTO 
CTRL-L DISEGNO LINEE 
CTRL-P PLOTTER QN-OFF 
CTRL-M MENU ' 

643 PRINT ' 

SPAZIO -> CAMBIA COLORE 

ESC -> GRAFICA TUTTO SCHERMO' 

644 PRINT ' 

'SPOSTAMENTO 

7 < 7 SINISTRA 
7 > 7 DESTRA 
7 RETURN 7 ALTO 
daqqh 

'=•' IN ALTO A DESTRA 
7,7 IN BASSO A SINISTRA" 

6Ì6 GOSUB 530: GET Al: PRINT : POKE - 16297,0: POKE - 16304,0:A = PEEK (790): GOTO 
740 

650 IWERSE : VTAB 23: HTAB 18: PRINT PI:PSI: FOR ZZ = 1 TO 1000: NEXT ZZ: VTAB 23: 

HTAB 18: CALL - 868: NORMAL : RETURN 
660 IF ST = 0 THEN ST = 1 : POKE - 16302,0: GOTO 680 
670 ST = 0: POKE - 16301.0 
680 GOSUB 530: POKE 792,ST: RETURN 

690 TEXT : GR : COLOR= 5: HLIN 19,28 AT 0: HLIN 19,28 AT 39: VLIN 0,39 AT 19: VLIN 
0 39 AT 28:B = 19: GOSUB 530 

700 A = Os GOSUB 750 :a‘= 12: GOSUB 750:A = 1: GOSUB 750:A = 15: GOSUB 750:A = 0: GOSUB 
750:A = 9: GOSUB 750:A = 6: GOSUB 750 

710 A = 15: GOSUB 750: HOME : VTAB 22: HTAB 21: PRINT '01234567': PRINT “IL COLORE A 
DESSO E' -> ‘;HC: PRINT 'INSERISCI UN NUMERO (0-7)'; 

720 GET A$:A = VAL (A»): IF A < 0 OR A > 7 THEN A = HC: GOTO 730 
730 PRINT : HOME : PRINT 'IL COLORE E' IL NUMERO ->*;A: FOR ZZ = 1 TO 1000: NEXT ZZ 
; POKE - 16297.0: POKE - 16304.0 

740 HC = A: HOME : GOSUB 540: GOSUB 480: GOSUB 660: GOSUB 660: POKE 790,HC: HCOLOR= 

HC: RETURN 

750 B = 8 + 1 : COLOR= A: VLIN 1,38 AT B: RETURN 
760 REM ROUTINE DISCO I/O 
770 0$ = CHR* (4) 

780 TEXT : HOME : GOSUB 530: PRINT : HTAB 18: IF PEEK (785) = 1 THEN PRINT 'LOAD' 

: GOTO 800 
790 PRINT 'SAVE' 

800 PRINT : PRINT : HTAB 8: PRINT 'CATALOG (S/N)?': 

810 K = PEEK ( - 16384): IF K < 128 THEN 810 

820 GOSUB 530:K = K - 128: IF K = 83 THEN PRINT : PRINT 0$:'CATALOG,VO' 

830 PRINT 



sti angoli. Anche in questo caso si può 
impiegare CTRL-A per interrompere. 
Qualche colore causa bizzarre spari¬ 
zioni, per cui si deve fare attenzione 
quando si usa questo modo. 

Al modo che serve per tirare le li¬ 
nee, si accede con CTRL-L (per speci¬ 
ficare i punti estremi si usa L). Un 
avvertimento: è possibile avere tutti 
questi modi attivi nello stesso tempo, 
cosa che può creare come conseguen¬ 
za una gran confusione per l’utente. In 
caso di dubbio si batta CTRL-A. Si 
cancelleranno tutti i modi e si potrà 
ricominciare. 

Quando si finisce di disegnare si bat¬ 
te CTRL-Q per tornare al menù prin¬ 
cipale e poi salvare la figura, pulire lo 
schermo o caricare una figura diversa. 
Il programma non scriverà sopra la 
figura in memoria né cancellerà lo 
schermo, a meno che non si risponda 
al prompt con l’intera parola “SI” (si 
tratta di un’intuibile misura di sicu¬ 
rezza). 

Fino a quando non ci si è impratichi¬ 
ti del funzionamento del programma 
non si abbia fretta di premere ’RE- 
TURN’ dopo i prompt. Non sempre è 
necessario e potrebbe influire sul se¬ 
guito del funzionamento. 

Nel programma ci sono due sistemi 
per aiutare chi tende a dimenticare i 
comandi o a battere Reset. Se si con¬ 
stata che si ha necessità di conoscere i 
comandi mentre si è nel modo disegno 
basta battere un punto interrogativo ? 
(SHIFT /) e i comandi verranno visua¬ 
lizzati fino a quando si premerà un 
tasto. L’altra caratteristica è il recupe¬ 
ro automatico dal reset. Se in un qual¬ 
siasi momento si preme accidental¬ 
mente RESET mentre si è nel modo 
disegno o si ha il menù, basta battere 
“3D0G”, e quando si è tornati al Ba¬ 
sic battere Il programma recupe¬ 

rerà tutto quanto, tranne il nome del 
file di più recente accesso. Se si esce 
dal programma battendo il “5” del me¬ 
nù principale basta battere per 
recuperare. 

Ecco un sommario di tutti i co¬ 
mandi. 
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Applesoft For The Ile 

di Brian D. Blackwood e George H. Blackwood. 
Scritto per l’Apple//e, presenta in 31 lezioni 
tutte le tecniche di programmazione, con 
esempi pratici, e programmi in 80 colonne. 

Sams. Lire 39.900. 

Abbonati ad Applicando 31.900. 
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Polishing Your Apple 

di Herbert M. Honig, Vol.1 e Vol.2. Una guida 
pratica e maneggevole per archiviare su disco 
e suggerimenti per menù d’aspetto 
professionale, error-trapping, e routine. 

Sams. Lire 9.900 ciascun volume. 
Abbonati ad Applicando 7.900. 


Apple II Applications 

di Marvin L. De Jong. Una serie di tecniche di 
interfacciamento che consentono di utilizzare 
un Apple// come sistema di sviluppo o di 
controllo, o rilevatore di misure. 

Sams. Lire 31.900. 

Abbonati ad Applicando 25.550. 
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Apple II ForKIds 
Proni 8 to 80 


Apple// For Kids From 8 to 80 

di Michael Zabinski e Frank Mazzola. Un libro 
ricco di esercizi pratici, scritto con le tecniche 
con cui si insegna nei computer-camp 
americani, di cui Zabinski è stato il fondatore. 

Sams. Lire 21.900. 

Abbonati ad Applicando 17.520. 



Apple Graphics Activities Handbook 

di Harold J. Baileye J. Edward Kerlin. Tutte le 
tecniche di grafica bi e tridimensionale per 
Apple II e Apple//e. Con esempi ed esercizi. 

Prentice Hall. Lire 23.900. 

Abbonati ad Applicandolo.120. 



The VisiCalc Book Apple Edition 

di Donald H. Beil. Una guida pratica su come 
costruire un modello, inserire i dati, 
sperimentare il what if?, costruire proiezioni di 
profitti/perdite, stime costo/prezzo, ecc. 

Reston. Lire 38.900. 

Abbonati ad Applicando 31.120. 












The Academic Apple 

di Richard Mowe. Una guida per genitori e 
insegnanti, per aiutare i bambini dai 5 anni in 
su ad imparare meglio grazie ad un Apple//. 
Un’ottima introduzione all’uso del computer. 

Reston. Lire 18.000. 

Abbonati ad Applicando 14.400. 



Better Basic For The Apple 

di J.N.P. Hume e R.C. Holt. Tutto ciò che 
occorre per utilizzare con efficacia un Apple in 
ufficio o a casa è compreso in questo libro, 
ricco di programmi strutturati, facili da 
copiare. 

Reston. Lire 41.500. 

Abbonati ad Applicando 33.200. 


Disk, Files, And Printers For The Apple// 

di Brian D. Blackwood e George H. Blackwood. 
Per imparare a realizzare text files e hard 
copies su carta. Tutto sui comandi per disk- 
drives e stampanti, con esempi pratici. 

Sams. Lire 31.900. 

Abbonati ad Applicando 25.520. 



Basic tricks For The Apple 

di Alien Wyatt. Ecco i trucchi che permettono 
ancora più efficienza. 35 routines per 
l’allineamento dei numeri, la gestione delle 
date e degli orari, la creazione di menù 
professionali, ecc. 

Sams. Lire 17.900. 

Abbonati ad Applicando 14.320. 



Using Apple Business Computers 

di Kenniston W.Lord, Jr., CDP. Volete 
ammortizzare rapidamente l’investimento per il 
vostro Apple///? Questo libro spiega come 
usare con efficacia le procedure che rendono 
di più. 

VanNostrand. Lire 40.000. 

Abbonati ad Applicando 32.000. 
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Applesoft Language 

di Brian D. Blackwood e George H. Blackwood. 
Sotto forma di lezioni (sono 29), questo 
manuale insegna il problem solving e il 
flowcharting, oltre ai comandi per la grafica e 
per il colore. 

Sams. Lire 27.900. 

Abbonati ad Applicando 22.320. 


Inviatemi, senza aggravio di spese postali, 
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n Applesoft For The Ile 
n Polishing Your Apple 
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□ Using Apple Business Comp. 
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Comandi di controllo 


CTRL-A Interrompe tutti i modi 
CTRL-B Introduce il modo ri¬ 
quadro 

CTRL-R Introduce il modo riempi¬ 
mento 

CTRL-I Imposta il valore d’incre¬ 
mento 

CTRL-L Introduce il modo disegno 
linee 

CTRL-P Commuta il plotter (inse¬ 
rito/escluso) 

CTRL-Q Smette, torna al menù 
principale 

“BARRA SPAZIO” Cambia il co¬ 
lore 

“ESC” Commuta fra testo/grafica 
misto e grafica a tutto schermo 


Comandi di spostamento 

“RETURN” Sposta in su 

<— (FRECCIA SINISTRA) Sposta a 

sinistra 

(FRECCIA DESTRA) Sposta a 
destra 

Sposta in giù 

o “=” Sposta alla sinistra in bas¬ 
so dello schermo 

“ ; ” o “ 4- ” Sposta alla destra in basso 
dello schermo 

Uno degli aspetti più interessanti di 
questo programma è il cursore lam¬ 
peggiante in alta risoluzione. Lo si ot¬ 
tiene nelle linee 90-150. La tastiera 
viene esplorata in continuazione, e se 
è stato premuto un tasto il programma 
va a linea 160. Se non è stato premuto 
si ha lo XDRAW del cursore e viene 
fatto un nuovo controllo. Questo ef¬ 
fetto dà al cursore un aspetto lampeg¬ 
giante. Si è ricorsi a XDRAW anziché 
al tracciamento diretto perché non 
cancella ciò che c’è già sullo schermo. 

Un’altra routine utilizzabile nei pro¬ 
pri programmi è quella di ripristino. 
Girando per la prima volta, il pro¬ 
gramma modifica la linea 10 in modo 
che contenga la parola chiave END. Si 
può usare qualsiasi valore (nell’esem¬ 
pio è stato scelto 128). Quando il pro¬ 
gramma gira la volta seguente viene 
eseguito, dopo un accidentale RE¬ 
SET, un controllo per vedere se la li¬ 
nea 10 sia normale oppure contenga 
END. Dato che il programma è stato 
già fatto girare, END è presente e vie¬ 
ne utilizzata la routine di ripristino. I 
valoro usati in questo programma ven¬ 
gono continuamente scritti in memo¬ 
ria con POKE in modo che si possa 
fare facilmente il recupero. 


340 INPUT 'NOME DEL FILE ->':FU: IF LEN (FU) = 0 THEN 1310 
850 IF PEEK (785) = 1 THEN 870 

860 PRINT Wj'BSAVE ';FU;',A*200Q,L$2Q00,VQ":F2* = FU; GOTO 1310 
870 PRINT 'LA FIGURA ORA IN MEMORIA SARA' PERDUTA.': INPUT 'CONFERMI <S/N)’';A$: IF 
LEFTI (A$,l) = 'S' THEN 890 
880 GOTO 1310 

PRINT Wj'BLOAD ':FU;',A*2000,V0':F2$ = FU: GOTO 880 
REM *** DRAU LINE 

60SU8 530: POKE - 16301,0: HOME : VTAB 22: PRINT 'MARCA I PUNTI ESTREMI DELLA 
LINEA' 

PRINT 'BATTI CTRL-A PER INTERROMPERE': IWERSE : PRINT 'UN TASTO QUALSIASI PER 
CONTINUARE';: GET A* 

N0RMAL : PRINT A$: GOSUB 53Q:PS$ = 'OFF': POKE 791,0: G0SUB 660: G0SUB 660 
HOME : VTAB 22: GOSUB 540: GOSUB 480:LD = 1:LP = 0: GOTO 360 
GOSUB 530:LP = LP ♦ 1: IF LP = 1 THEN VTAB 22: HTAB 18: PRINT CHR* (7):'PUNTO 
1 ' : FOR 22 = 1 T0 1000: NEXT : HTAB 18: VTAB 22: CALL - 868:LX = 

X:LY = Y: GOTO 360 

HC0L0R= HC: HPL0T LX,LY T0 X,Y:LD = 0:LP = 0: GOSUB 530: GOTO 360 
IF P = 0 THEN 1010 
IF P = 1 THEN 1060 
IF P = 2 THEN 1080 

1000 IF P = > 3 THEN P = 0: GOSUB 540: GOSUB 660: GOSUB 660: GOSUB 480: GOSUB 530: 
FS = 0: GOTO 360 

1010 GOSUB 530: PRINT CHR$ (7): CHR$ (7): POKE - 16301,0: HOME : VTAB 22 
1020 PRINT 'FISSA IL PUNTO IN ALTO A SINISTRA E IL PUNTO IN BASSO A DESTRA': PRINT 
'BATTI CTRL-A PER INTERROMPERE' 

1030 INVERSE : PRINT 'UN TASTO QUALSIASI PER CONTINUARE':: GET A$: NORfttL : PRINT A 


890 

900 

910 

920 

930 

940 

950 


960 

970 

980 

990 


1040 GOSUB 530: HOME : VTAB 22:PS* = 'OFF': POKE 791,0 

1050 GOSUB 660: GOSUB 660: GOSUB 540: GOSUB 480:FS = 1:P = 0: GOTO 360 

1060 XL = X:YL = Y: GOSUB 530: VTAB 22: HTAB 20: PRINT 'PUNTO 1 

) 

1070 FOR 22 = 1 TO 1000: NEXT 22: VTAB 22: HTAB 19: CALL - 868: GOTO 360 
1080 XR = X:YR = Y: VTAB 22: HTAB 20 


CHR* (7 


1090 PRINT CHR$ (7); CHR$ (7): VTAB 22: HTAB 20: CALL - 868: GOSUB 530 

1100 FS = 0:P = 0: IF YL > YR THEN S = - 1: GOTO 1120 

Ilio S = 1 

1120 HCQL0R= HC 

1130 FOR 21 = YL TO YR STEP S 

1140 HPLOT XL,21 T0 XR.21 

1150 NEXT 21: GOSUB 530: GOTO 360 

1160 DP = 0:BD = 1: POKE - 16301,0: HOME : PRINT : GOSUB 530: VTAB 22 
1170 PRINT 'FISSA L'MGOLG IN ALTO A DESTRA E': PRINT 'L'^GOLO IN BASSO A SINISTRA 
': PRINT 'BATTI CTRL-A PER INTERROMPERE' 

1180 IWERSE : PRINT 'UN TASTO QUALSIASI PER CONTINUARE' ; : GET A$: NORML : PRINT A 
$: HOME : VTAB 22:PS* = 'OFF' 


1190 GOSUB 530: POKE 791,0: GOSUB 660: GOSUB 660: GOSUB 540: GOSUB 480: GOTO 360 
1200 DP * DP ♦ 1: IF DP * 2 THEN 1230 

1210 GOSUB 530: VTAB 22: HTAB 20: PRINT 'PUNTO 1 ': CHR$ (7); CHR$ (7) 

1220 FOR 22 = 1 T0 1000: NEXT 22: VTAB 22: HTAB 20: CALL - 868:BX = X:BY = Y: GOTO 
360 

1230 HC0LQR= HC: HPLOT BX,BY TO X.BY TO X,Y TO BX,Y TO BX,BY 
1240 GOSUB 530:BD = 0:DP = 0: GOTO 360 
1250 REM MENU PRINCIPALE 

1260 SCALE= 1: R0T= Q:HC = 3:INC = 1:ST = 0:PS$ = 'OFF':. HCOL0R= HC:X = 0:Y = Q:F2$ 

= '?': HGR : GOSUB 530: POKE 2063,128 
1270 FOR 22 = 786 TO 796: POKE 22,0: NtXT 
1280 POKE 790,HC: POKE 789,1: POKE 792,ST 

1290 POKE 232,27: POKE 233,3: POKE 795,1: POKE 796,0: POKE 797,4: POKE 798,0: POKE 
799.29: POKE 800.0: POKE 801.0 
1300 POKE 216,0: 0NERR GOTO 1650 

1310 PRINT : TEXT : HOME : NQRMAL : SPEED= 255: GOSUB 53Q:FS = 0:LD = 0:BD = 0:P = 
Q:LP = 0:DP = 0 

1320 POKE 1013,76: POKE 1014,102: POKE 1015,213 

1330 HTAB 8: PRINT '***» APPLE ARTISTA HTAB 12: PRINT 'BY TONY DAHBURA': PRINT 

1335 PRINT : PRINT : PRINT 'ULTIMA FIGURA CARICATA : \-F2$ 

1340 PRINT : PRINT : PRINT : HTAB 16: INVERSE : PRINT ' MENU : ': NORMAL 
1350 PRINT : PRINT 

1360 HTAB 8: PRINT *1- TAVOLA FIGURE': HTAB 8: PRINT '2- CARICA FIGURA': 

HTAB 8: PRINT '3- SALVA FIGURA' 

1370 HTAB 8: PRINT '4- PULISCE LO SCHERMO': HTAB 8: PRINT '5- FINE PROGRAM': PRINT 
1380 PRINT 'QUALE —>'; 

1390 GET A$:A* = A$:A = VAL (A*): IF A < 1 OR A > 5 THEN 1390 
1400 PRINT A: PRINT 

1410 IF A = 5 THEN TEXT : HOME : POKE 216,0: END 

1420 IF A = 1 THEN GOTO 50 

1430 IF A = 2 THEN POKE 785,1: GOTO 760 

1440 IF A = 3 THEN POKE 785.2: GOTO 760 
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1450 IF A = 4 THEN PRINT : PRINT : INPUT 'CONFERMI ? (S/N)? ';A$: 1F Al < ) 'S' 
THEN 1310 

CALL 62450: 60T0 1310 
PRINT CHR* (7); CHR» (7);'ERR0R': END 
END 

REM ROUTINE DI RIPRISTINO 
CLEAR :X = PEEK (786) ♦ PEEK (787):Y = PEEK (788) 

GOSUB 530 : INC = PEEK (789):HC = PEEK (790) 

IF PEEK (791) = 0 THEN PS* = 'OFF': GOTO 1540 
1530 PS» = 'ON' 

1540 ST = PEEK (792):C = PEEK (793):F2» = '?' 

1550 IF C = 0 THEN C = 1: GOTO 1570 
1560 C = 0 

1570 POKE 793.C: POKE 232,27: POKE 233,3: POKE 795,1: POKE 796,0: POKE 797,4: POKE 
798,0: POKE 799,29: POKE 800.0: POKE 801,0 
IF C = 0 THEN HCOLQR= 0: XDRAU 1 AT X.Y 

TEXT : HOME : POR 22 = 3 TO 22: VTAB 22: PRINT •*': NEXT 22 

FOR 22 = 3 TO 22: VTAB 22: HTAB 40: PRINT '»': NEXT 22 

FOR 22 = 1 TO 40: HTAB 22: VTAB 2: PRINT NEXT 22 
FOR 22 = 1 TO 40: HTAB 22: VTAB 23: PRINT '*': NEXT 22 
SCALE= 1: ROT= 0: POKE 216,0 
ONERR GOTO 1650 

VTAB 8: HTAB 8: PRINT 'APPLE ARTISTA": PRINT : PRINT : PRINT '* (0 
1984 BY APPLICANDO & MICROSPARC *' 

FOR 22 = 1 TO 2000: NEXT 22: GOTO 1310 
REM ROUTINE DI ERRORE 
1650 E = PEEK (222) 

1660 IF E = 255 THEN RÉSUMÉ : REM CTRL-C 

1670 IF E = 6 THEN PRINT 'NESSUN FILE CON QUEL NOME": GOTO 800 

1680 IF E = 9 THEN PRINT 'DISCO PIENO!': GOTO 800 

1690 IF E = 10 THEN PRINT 'ESISTE GIÀ' UN FILE CON QUEL NOME': PRINT 'CONFERMI UGU 
ALMENTE (S/N) ';: GOSUB 530: GET A»: PRINT : IF A» = 'Y' THEN PRINT D»;'UNLOC 
K 'FU: GOTO 860 

1700 IF E = 10 AND A» < > 'Y' THEN 1310 

1710 IF E = 8 THEN PRINT 'Z'V LO SP 


1460 

1470 

1480 

1490 

1500 

1510 

1520 


1580 

1590 

1595 

1600 

1605 

1610 

1620 

1625 

1630 

1640 


Ecco le aree principali 
del programma 

0010-0040 Area di controllo autore- 
cupero 

0050-0360 Routine disegno, com¬ 
preso controllo chiave 
0180-0210 Incremento o decremen¬ 
to di X o Y nella quantità specificata 
dalla variabile “INC” 

0370-0400 Accerta che X e Y siano 
nei limiti 

0420-0440 Scrive in memoria X e Y 
di modo che sia possibile l’autorecu- 
pero 

0450-0470 Controlla se tracciare o 
solo spostare 

0480-0520 Aggiorna il contatore di 
X e Y in fondo allo schermo 
0550-0610 Permette di impostare 
un nuovo incremento 
0690-0750 Permette di scegliere un 
nuovo colore Hi-Res. Viene anche 
scritto in memoria per l’aùtorecupero 
0760-0890 È la routine di input/out¬ 
put per il dischetto. La locazione 785 
contiene un 1 per BLOAD e un 2 per 
BSAVE 

0900-0960 È il modo di disegno del¬ 


le linee 

0970-1150 È la routine di riempi¬ 
mento 

1160-1240 È la routine del modo di 
disegno del riquadro (cornice) 
1250-1480 È la routine principale, 
che comprende la scrittura in memoria 
del dot lampeggiante e l’impostazione 
della locazione del segno e per il recu¬ 
pero 

1490-1630 Routine di ripristino. Si 
salta qui per una partenza a caldo 
1640-1720 Routine di trappola del¬ 
l’errore 


Il programma in pratica 

Ecco una breve rassegna di tutte le 
funzioni del programma. 

Si parte dal presupposto che lo 
schermo sia pulito. In caso contrario 
deve essere battuta l’opzione 4 per pu¬ 
lire lo schermo. 

Se si disegna, per esempio, una ca¬ 
tena montuosa, con un oceano in bas¬ 
so, si entra per prima cosa nel modo 
disegno (con l’opzione 1). Poi si batte 
CTRL-I e si fissa l’incremento a 5 ; così 



si potranno compiere più rapidamente 
gli spostamenti. Si sposta poi il cursore 
press’a poco a centro schermo: sarà 
questa la vetta della montagna. A que¬ 
sto punto si preme la barra spazio e si 
sceglie il colore in cui si vuole che figu¬ 
ri la montagna. Fatto ciò, e tornati al 
modo disegno, si digita CTRL-L. Ba¬ 
sta battere L e, in un secondo si riavrà 
il cursore, che adesso è posizionato 
sulla vetta della montagna. Usando i 
tasti di spostamento del cursore e spo¬ 
standolo in giù e a sinistra, si disegna il 
fianco sinistro della montagna. Quan¬ 
do si è giunti dove si vuole che sia la 
base, si batte nuovamente L e la linea 
viene disegnata. Si fa lo stesso per il 
fianco destro, partendo anche questa 
volta dalla punta. 

Adesso si riempie di blu il fondo 
della montagna: si batte la barra spa¬ 
zio e si sceglie il blu, per poi spostare il 
cursore in giù per 3/4 della montagna, 
fin dove si vuole che cominci l’oceano, 
e si batta CTRL-F. Dopo aver letto la 
breve nota, si batte F per registrare 
questo punto. Adesso si muove il cur¬ 
sore orizzontalmente attraverso la 
montagna e poi in giù fino al fondo 
della montagna e si batte di nuovo F. 
La montagna è stata colorata di blu. 

Ora si può incorniciare la figura, 
scegliendo il bianco. Si batte la barra 
spazio e si sceglie il numero 3. Quando 
si è tornati al modo disegno, si digita 
CTRL-B e si legge la nota. Quando si 
è ultimato si batte un tasto, e poi un 
“=” o un Questo porterà istanta¬ 
neamente il cursore alla sommità dello 
schermo. Adesso si batte B. Quando il 
cursore torna, si batte un “+” o un 
Così si verrà situati in basso a sinistra 
sullo schermo. Se non si riesce a vede¬ 
re il cursore, è necessario battere 
“ESC”. Quando si batte nuovamente 
B la figura è incorniciata di bianco. A 
questo punto si può battere CTRL-Q 
per salvare la figura o si può ricomin¬ 
ciare a tracciare. Se si vuol tracciare si 
batte CTRL-P e, ogni volta che si spo¬ 
sta il cursore, viene tracciato un punto 
(o più punti). ■ 


® 1984 by Nibble e Applicando 
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Con una semplice routine e anche senza 
disporre di una clock card sarà possibile inizializzare 
i floppy disk con giorno, mese e anno. 

✓ 

Calendario 
per dischetto! 


V 

E molto comodo, in certi program¬ 
mi, disporre automaticamente 
della data (giorno, mese e anno) senza 
dover ogni volta creare delle subrouti¬ 
ne adattabili al problema. Una solu¬ 
zione potrebbe essere rappresentata 
dalla scheda orologio CCS, meglio no¬ 
ta per gli addetti ai lavori come clock 
card, (viene distribuita dalla Apple a 
un costo intorno alle 300 mila lire). 
Consiste in una scheda da inserire in 
uno slot appositamente predestinato 
dell’Apple che, grazie a una batteria 
autonoma, mantiene aggiornato il ca¬ 
lendario e l’ora solare anche a compu¬ 
ter spento. Una sofisticatezza che tro¬ 
va applicazione soprattutto in attività 
che necessitano dell’ora e del giorno 
per segnalare l’inizio e la fine del lavo¬ 
ro o per altri utilizzi. 

Il problema può però essere risolto 
anche a livello di software usando la 


breve routine pubblicata in queste pa¬ 
gine. Il programma DATA.HELLO 
non emula completamente una clock 
card. E’ però in grado di mantenere in 
memoria la data inserita al momento 
dell’accensione dell’Apple fino a un 
Reset dello stesso. 

Il programma 

Una volta battuto, il listato dev’es¬ 
sere salvato nel file HELLO o in quel¬ 
lo con cui è stato inizializzato il di¬ 
schetto. Al caricamento, il program¬ 
ma inviterà a inserire la data odierna. 
A questo punto, il giorno, il mese e 
l’anno verranno raccolti e posti rispet¬ 
tivamente nelle ultime tre locazioni di 
memoria della pagina 3 (973,974,975). 
Normalmente queste tre locazioni non 
vengono influenzate dai vari comandi 
LO AD, SA VE, RUN etc., e manten¬ 
gono così intatti i loro valori. 
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Ma come fare per sfruttare la data 
pokerata in memoria? La cosa più 
semplice è quella di assegnare i valori 
delle tre locazioni a una variabile, di 
tipo alfanumerico , all’inizio del pro¬ 


gramma. La linea da battere potrebbe 
essere questa: 

100 DT$ = STR$ (PEEK(973)) + ’7” 
+ STR$ (PEEK(974)) + + STR$ 

(PEEK(975)) 


In questo modo, con DT$, 
la data potrà essere richiama¬ 
ta in qualsiasi punto del pro¬ 
gramma. Se invece si vogliono 
utilizzare giorni, mesi e anni 
in calcoli particolari (per 
esempio potrebbe essere utile 
ai fini di un calcolo di compe¬ 
tenze bancarie o assicurative 
moltiplicare il giorno per de¬ 
terminati coefficienti di calco¬ 
lo) la variabile dovrà essere di tipo 
numerico. 

Ecco come potrebbe presentarsi la 
linea: 

100 DT = PEEK(973) *30 + 
PEEK(975) *360 

Le applicazioni pratiche possono es¬ 
sere infinite; basta un po’ di fantasia 
per scoprire in quale programma e in 
quale contesto può essere meglio uti¬ 
lizzata questa routine. 

Qualche nota 

Pokerare la data nelle locazioni di 
memoria 973-975 ($3CD-$3CF) non è 
l’unico modo di procedere possibile, è 
solo quello più semplice. Altri possibi¬ 
li bits da occupare, normalmente inu¬ 
tilizzati, sono quelli dalla pagina 0 al 
DOS ($9CF8-$9CFF). 

I più esperti del linguaggio macchi¬ 
na troveranno forse migliore questa 
soluzione: così la pagina 3 resterebbe 
completamente libera per altri impie- 
ghi. ■ 


REM «m*m*mm*********************** 


91 REM * DATA . HELLO * 

92 REM * (C) 1984 BY APPLICANDO & MICROSPARC * 

93 REM *m*mm**#m»#******###*»#******** 

102 HOME : HTAB 15: PRINT "DATA .HELLO': PRINT : HTAB 4: PRINT 70 1984 BY 
APPLICANDO & MICROSPARC ' 

104 VTAB 13: PRINT 'VUOI FISSARE IN MEMORIA LA DATA ODIERNA?': VTAB 15: HTAB 
18: GET Y$: QN 1 + (Y$ = 'N') ♦ 2 * (Y* = "S") GOTO 100,190 
110 TEXT : HOME : VTAB 5: PRINT 'INSERISCI LA DATA NEL SEGUENTE ORDINE:' 

115 VTAB 7: HTAB 16: PRINT '31/12/84' 

120 DI = ": VTAB 10: HTAB 16: CALL - 868: PRINT ' / / ' 

130 VTAB 10: HTAB 16: GET DI: PRINT DI;:M0I = DI: GET DI: PRINT D*"/";:DA = 

VAL (MOI ♦ DI) 

140 GET DI: PRINT DI;:DAI = DI: GET DI: PRINT DI'/';:M0 = VAL (DAI ♦ DI) 

150 GET DI: PRINT DI;:YRI = DI: GET DI: PRINT DI;:YR = VAL (YRI + DI) 

160 0N 1 ♦ (DA > 1 AND DA < 13) * (MO ) 0 AND HO < 32) GOTO 120 

170 HTAB 25: PRINT ' OK’ ';: GET Yl: ON 1 ♦ <YI = 'N') + 2 * <YI = 'S') GOTO 

160,120 

180 POKE 973,DA: POKE 974,M0: POKE 975,YR 
190 END 
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Mille programmi 



Possiedi già da tempo un perso¬ 
nal computer Appiè? 

Allora non c’è bisogno di dirti quan¬ 
to può essere prezioso questo libro: 
sai già che il tuo computer, senza 
programmi, è come un’auto senza 
benzina. E poiché non c’è limite alla 
fantasia e all’inventiva, consultando 
questa guida scoprirai utilizzi im¬ 
pensati per il tuo personal. Utilizzi 
che ti permetteranno nel lavoro, nel 
tempo libero, nel gioco o nello stu¬ 
dio, di essere sempre il più aggior¬ 
nato, il più organizzato, il più soddi¬ 
sfatto... 


Ritagliare, compilare e 
spedire a: Editronica Srl, 
Corso Monforte 39, 
20122 Milano. 


Stai per acquistare un personal 
computer Apple? 

Vorrai sapere che cosa puoi farci. 
Questo volume è un aiuto indispen¬ 
sabile, una guida ragionata e com¬ 
pleta di tutti i programmi disponibili 
in Italia. Prima di fare il tuo acquisto 
non puoi non consultarlo, perché 
solo se avrai a disposizione il pro¬ 
gramma o i programmi che ti inte¬ 
ressano la tua scelta non ti lascerà 
deluso. 


perle 


Hai appena acquistato un perso¬ 
nal computer Apple? 

Senza questa raccolta di program¬ 
mi non potrai mai sapere quali e 
quanti utilizzi potrai farne. 


X Le Pagine del Software 
sono un supplemento se¬ 
mestrale di Applicando, il 
mensile per i personal com¬ 
puter Apple. Acquistarle 
singolarmente costa 
12.000 lire. Per chi si abbo¬ 
na ad Applicando sono in 
regalo. 


Desidero ricevere, senza aggravio di spese postali, Le Pagine del Software con la 
seguente formula (segnare la casella di proprio interesse): 

□ 12.000 lire per ricevere l’edizione Autunno 1984 de Le Pagine del Software 

□ 50.000 lire per ricevere 10 numeri di Applicando e in regalo l’edizione Autunno 1984 
de Le pagine del Software. 

COGNOME E NOME. 

VIA ...... N. 

CAP. CITTÀ.. PR0V. 

□ Allego assegno non trasferibile di L.intestato a Editronica Srl. 

□ Allego ricevuta di versamento di L.sul CC postale N. 19740208 intestato a Editronica Srl, 


Corso Monforte 39, 20122 Milano. 

□ Pago fin d’ora con la mia carta di credito Bankamericard N.scadenza 

Data. Firma. 

□ Desidero fattura. Il mio C.Fisc./P.lva è. 
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Per facilitare ancor più la consultazione delle Pagine del Software, 
Applicando ha realizzato un indice elettronico che viene dato 
in omaggio a chi si abbona. Contiene tutte le informazioni 
utili per'una immediata ricerca del programma che interessa, 
al di fuori della scheda descrittiva. 




Un 
mille 


monitor 

programmi 


1 1000 programmi delle Pagine del 
Software per Apple sono disponibili 
anche su dischetto. Applicando ha in¬ 
fatti raccolto in un indice elettronico 
tutto il software pubblicato nel volu¬ 
me, assegnando a ogni programma 
una breve scheda descrittiva con il set¬ 
tore applicativo, il nome del program¬ 
ma, il produttore, l’eventule distribu¬ 
tore, il prezzo, la configurazione e il 
numero di pagina che occupa nel volu¬ 
me: insomma con l’ausilio dell’indice 
elettronico, trovare il programma che 
interessa è ancora più facile e più 
veloce. 

Il dischetto, che viene fornito come 
omaggio agli abbonati di Applicando, 
funziona a doppia faccia. Da un lato 
viene caricato il programma Cfs della 
Cominfor di Torino (adattato in modo 
di leggere solo la maschera relativa 
all’indice elettronico), mentre sull’al¬ 
tro il disco dati. 

Ecco come si procede per sfogliare il 
dischetto: dopo averlo inserito con l’e¬ 
tichetta rivolta verso l’alto, verrà vi¬ 
sualizzato il menu del programma. A 
questo punto bisogna estrarre il di¬ 
schetto, girarlo, reinserirlo con l’eti¬ 
chetta rivolta verso il basso, scegliere 
l’opzione 2 (ricerca/modifica) e, di 
seguito, battere Return. Apparirà 
allora una scheda senza dati. 

Per la ricerca è necessario 
posizionare il cursore sul cam¬ 
po che interessa usando i ta¬ 
sti CTRL-I (per passare dal 
primo campo a quelli suc¬ 
cessivi) e CTRL-D (per 
risalire). 

Chi non dispone 
della scheda di 
espansione a 80 
colonne potrà vi¬ 
sualizzare solo i pri¬ 


mi tre campi della maschera (pagina 
1) ; per vedere il resto della scheda (pa- 
gina 2) dovrà battere CTRL-O; 
CTRL-P permette di tornare a rivede¬ 
re la prima parte. 

Una volta posizionato il cursore sul 
campo prescelto, bisogna battere la 
chiave di ricerca chiusa tra due cancel- 
letti. Per trovare tutti i programmi di 
ingegneria, per esempio, bisogna posi¬ 
zionare il cursore sul settore applicati¬ 
vo e battere #INGEGNERIA#. Il ca¬ 
rattere può essere indifferentemente 


maiuscolo o minuscolo. Il monitor vi¬ 
sualizzerà ugualmente le schede delle 
applicazioni richieste; attenzione in¬ 
vece a non inserire uno spazio tra i due 
cancelletti e la chiave di ricerca: lo 
spazio verrebbe considerato come un 
carattere e il programma non trove¬ 
rebbe alcuna corrispondenza nelle 
schede. 

L’indice elettronico delle Pagine del 
Software è stato realizzato nella ver¬ 
sione per Apple II, II plus e //e con 40 
o 80 colonne e un disk drive. ■ 
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PER IL TUO APPLE // 


Vi piacciono le regate? O preferite esplorare le caverne dell’Olimpo? Oppure vorreste 
avere sul vostro schermo il fantastico gioco della scimmia che scappa arrampicandosi sulle 
pareti lisce di un grattacielo? Siete invece tipi riflessivi e vi dilettate di musica? Non 
preoccupatevi, qui c’è sicuramente quello che fa per voi. Per gli amanti di tanti giochi tutti 
insieme è disponibile una raccolta. Per chi, infine, vuole migliorare le proprie capacità di 
programmatore, ecco tutti i trucchi del Basic su dischetto. E a prezzi eccezionali. 



REGATTA. Un gioco entusiasmante che farà 
impazzire marinai esperti e meno esperti di 
qualunque età. Ogni concorrente ha a 
disposizione una barca e un circuito. Poi ci 
sono i venti, gli ostacoli, gli imprevisti... Una 
grafica realistica vi farà volare tra le onde. 
Paddle o Joystick opzionali. Dischetto con 
programma e manuale in elegante 
confezione a sole 40.000 lire. 


CAVES 0F OLYMPUS. Oltre a una grafica a 
colori ultraprofessionale, questo gioco di 
abilità sfodera suoni ed effetti speciali di 
qualità nettamente superiore. Divertente, 
intrigante e irresistibile. Non richiede né 
paddle né joystick. Dischetto con 
programma e manuale in elegante 
confezione a sole 40.000 lire. 


APPLE ESCAPE. Una scimmia è fuggita dallo 
zoo e si arrampica sulle finestre di un 
grattacielo. Elicotteri le ronzano attorno e il 
guardiano dello zoo la insegue. Riuscirà a 
raggiungere il tetto e la libertà? Tutto dipende 
da quanto abili siete. Grafica a colori. Non 
richiede né paddle né joystick. Dischetto con 
programma e manuale in elegante 
confezione a sole 40.000 lire. 



MUSIC GAMES. 12 programmi educativi e 
divertenti sul filo delle 7 note. Senza bisogno 
d’altro, il vostro Apple si tramuterà in un 
docile strumento musicale dal quale 
imparare e col quale divertirsi. Sono richieste 
le paddle o il joystick. Dischetto con 
programma e manuale in elegante 
confezione a sole 40.000 lire. 


APPLEGAMES.il giochi: Flip-Flop, 
Mastermind, Towers, Sherlock’s home, 
Attackof theZargons, Phaser Practice, 
Acey-Ducey, Big government, Tic-Tac-Toe, 
Qubic, Depth charge. E tre programmi di 
utilità: Shapetablegenerator, Opening 
ceremonies, Master catalog. Per alcuni 
giochi sono richieste le paddle o il joystick. 
Dischetto con programma e manuale in 
elegante confezione a 50.000 lire. 


BASIC TRICKS FOR THE APPLE. 35 routine 
che renderanno molto più professionali i 
vostri programmi in Basic e che vi sarà 
facilissimo imparare utilizzando il manuale e 
il dischetto offerti in elegante confezione a 
sole 50.000 lire. 


K 


Cognome e nome. 

Via.N. 

Cap.Città .Provincia. 

Scelgo la seguente formula di pagamento: 

□ Allego assegno non trasferibile di lire.intestato a Editronica srl, 

Corso Monforte 39, 20122 Milano 

□ Allego ricevuta di versamento di lire.sul conto corrente postale 

n. 19740208, intestato a Editronica srl, Corso Monforte 39, 20122 Milano 


Sì! Inviatemi subito, senza aggravio di spese 
postali, il o i programmi contrassegnati con 
una crocetta. 

□ REGATTA. 40.000 lire. 

□ CAVES OF OLYMPUS. 40.000 lire. 

□ APPLE ESCAPE. 40.0no lire. 

□ MUSIC GAMES. 40.000 lire. 

□ APPLE GAMES. 50.000 lire. 

□ BASIC TRICKS FOR THE APPLE. 

50.000 lire. 


Data 


Firma 















































Aspettando 
il drive 

Ho acquistato circa quat¬ 
tro mesi fa un sistema simile 
all’Apple III , e vi ho collega¬ 
to un registratore portatile 
Panasonic e un piccolo tele¬ 
visore. Pur avendo verifica¬ 
to più volte l’esattezza dei 
collegamenti, non riesco a 
registrare i programmi su 
cassetta o a far girare dei vi¬ 
deogame (sempre su casset¬ 
ta) che ho acquistato. 

Tutti i rivenditori cui ho 
sottoposto il problema non 
sono stati in grado di aiutar¬ 
mi, perché utilizzano i loro 
Apple unicamente con il si¬ 
stema Dos: io, invece, in at¬ 
tesa di un drive sono costret¬ 
to a ripiegare sul registrato- 
re e, quando inserisco i vi- 
deogames, mi vedo rispon¬ 
dere “ERR” a qualsiasi re¬ 


golazione del volume. 

Paolo Alberti 

L'uso di un normale regi¬ 
stratore per il salvataggio o il 
caricamento di programmi 
può causare problemi tecni¬ 
ci, dovuti a una bassa rispo¬ 
sta in frequenza del registra¬ 
tore stesso. Il computer, in¬ 
fatti, comunica con le perife¬ 
riche tramite segnali a onda 
quadra ad alta frequenza, e i 
normali mangianastri, che 
hanno in media una risposta 
in frequenza di 10 mila Hz, 
distorgono il segnale renden¬ 
dolo incomprensibile. 

Per rimediare a questo in¬ 
conveniente si può provare a 
utilizzare un registratore ad 
alta fedeltà oppure costruire 
una di quelle interfacce di 
semplice realizzazione pre¬ 
sentate dalle riviste specializ¬ 
zate (vedere, per esempio, 
Radio Elettronica & Com¬ 
puter, numero 4!1984). 


L’Iva 

è esclusa 

Precisiamo che i prezzi 
contenuti nell’inserzione 
pubblicata sul numero 7 
di Applicando a pagina 
68 non sono comprensivi 
di Iva, contrariamente a 
quanto riportato per un 
errore tipografico. 

Southern European 
Computer, 
Montorfano (CO) 


Movimento 
e sfarfallio 

Vorrei sapere se esiste un 
sistema per fare muovere 
una figura sullo schermo 
senza vedere il fastidioso 
sfarfallio causato dal tempo 
che intercorre tra la cancel¬ 
lazione delle figure nella 


vecchia posizione e la crea¬ 
zione di quelle nuove. 

Gianluca Belvisi, Bologna 

Per evitare che le immagi¬ 
ni lampeggino bisogna uti¬ 
lizzare alternativamente le 
due pagine grafiche e, più 
precisamente, disegnare sul¬ 
la pagina grafica nascosta 
per poi cambiarla con quella 
che si stava vedendo, per 
mezzo delle relative Poke. 
Se, per esempio, si sta veden¬ 
do HGR1, si deve disegnare 
la figura nella nuova posi¬ 
zione in HGR2, per poi cam¬ 
biare le pagine grafiche. 

Le Poke necessarie sono: 
POKE-16300,0 (perpassa¬ 
re dalla pagina 2 alla pagina 

1) ; POKE - 16299,0 (per 
passare dalla pagina 1 alla 

2) ; POKE 230,32 (per scri¬ 
vere su HGR1); POKE 
230,64 (per scrivere su 
HGR2). 


appiic 


“VOLA IN CALIFORNIA” 

Un grande concorso per tutti i lettori di Applicando. 
Primo premio: un viaggio di 8 giorni che ti porterà a 
New York e poi nella mitica Silicon Valiey, in 
California con visita alla Apple Computer di 
Cupertino. Secondo premio: un Apple//c, il nuovo 
personal computer completo, compatto con grafica 

ad altissima risoluzione. 

Un’occasione davvero da non perdere. 

T ra le pagine dei prossimi numeri di Applicando 
troverai i biglietti che possono farti volare in 
California oppure vincere un Apple Ile. Più biglietti 
invierai più probabilità di vincere avrai. Non perdere i 
prossimi numeri di Applicando: e se non vuoi 
rischiare di sentirti dire dall’edicolante: «Mi spiace, 
è esaurito», abbonati. Riceverai a casa 10 numeri di 

Applicando, con uno sconto o un regalo, e sarai 
sicuro di partecipare al concorso “Vola in California”. 
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analisi statica e dinamica agli elementi finiti 
strutture tridimensionali del tutto generali 

input/output grafico interattivo 
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analisi statica e dinamica (zona sismica) 
strutture tridimensionali ad impalcati rigidi 

input/output grafico interattivo semplificato e veloce 


progetto e disegno esecutivo 
elementi strutturali in calcestruzzo armato 

editing grafico 


trore n.B dimensioni materiali carichi PflOGETTR STAMPA FINE 
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software per applicazioni scientifiche 
via Reggio Calabria 6 - tei. 06/4248732 
00161 - ROMA 


Listati 

ritardati 

Nell’articolo «Stampan¬ 
te: come spiegarle che il cer¬ 
chio è rotondo», di Franco 
Zgavc (Applicando n. 8) 
non sono stati pubblicati i 
quattro listati in linguaggio 
macchina da inserire diret¬ 
tamente con il monitor, ne¬ 
cessari per dare le istruzioni 
alle stampanti Epson Fx-80 
e Mx-82 per la stampa di una 
singola pagina o di due pagi¬ 
ne affiancate. Nel provvede¬ 
re a pubblicarli in queste pa¬ 
gine (listati 1, 2, 3 e 4), ci 
scusiamo con l’autore del¬ 
l’articolo e con i lettori. 
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1) Stampa di una 

singola pa- 

gina (HGR) 

su 

Epson Fx-80. 
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Mercatino delle mele 


Vendo “Totoplus” per 
Apple II, programma com¬ 
pleto totocalcio con sistemi ri¬ 
dotti - derivati a rotazione e 
correzione di errori - a sezio¬ 
ni. Telefonare per invio speci¬ 
fiche. Costo L. 50.000. 
Telefonare allo 0362/534361 
ore serali e chiedere di 
Giorgio. 

Vendo Apple //plus + 1 
drive + scheda controller + 
scheda Pai + eventuali pro- 
grammi a scelta a lire 


COMPRATE, 
NON COPIATE! 

A partire da questo 
numero, Applicando 
per non promuovere 
Il commercio illegale 
di software copiato, 
filtra attentamente gli 
annunci riguardandi 
il software. 


1.500.000. Telefonare allo 
033/400303 e chiedere di 
Tiziano. 

® Vendo causa militare 
scheda music-system per Ap¬ 
ple, per sintesi musicale. Pen¬ 
tagrammi in hi-res per l’inseri- 
mento delle note, possibilità 
di variare parametri. Mai usa¬ 
ta, L. 350.000 trattabili. 
Daniele Zingoni, via Vergio- 
lesi 2, Pistoia. Tel. 
0573/33075. 

Occasionissima! Vendo 
stampante grafica Seikosha 
GP-80M, con software e ac¬ 
cessori, usata pochissimo. In¬ 
clusa interfaccia per Apple. 
Telefonare allo 0444/22097 
ore pasti. 

Acquisto (o scambio con 
software vario per Apple) i 
programmi musicali per Alp- 
hasynthauri, Soundchaesar o 
Music-pak-jen. Domenico De 
Simone, via Vado di Sole, 6 - 
65100 Pescara. Tel. 
085/4151352. 


































































































A casa tua, partendo dalle nozioni 
di base e mettendo ogni volta in pratica 
ciò che impari, diventerai un esperto in 
micro-calcolatori. 

Non solo, ma con i materiali del Corso, 
costruirai interessanti apparecchiature 
che resteranno di tua proprietà e 
ti serviranno sempre: il 
(laboratorio di elettronica 
sperimentale), il TESTER (analizzatore 
universale), il DIGILAB (laboratorio 
digitale da tavolo), l’EPROM 
PROGRAMMER (programmatore di 
memorie EPROM) e l’ELETTRA COMPUTER 
SYSTEM (microcalcolatore basato sullo Z80). 
Chiedi oggi stesso informazioni gratis e senza 
impegno su questo 
nuovo Corso o 
sugli altri 9 Corsi 
di elettronica 
preparati per 
te da Scuola 
Radio 
Elettra. 


I microcomputer richiedono tecnici capaci di 
assicurarne sempre il perfetto funzionamento. Sapere 
com’è fatto un microcomputer, conoscerne tutti i segreti, 
è il punto di partenza per un’attività moderna, specialistica 
e interessante anche per le possibilità di guadagno. 

Ecco perché Scuola Radio Elettra 

ti propone il CORSO-NOVITÀ’ 
. ELETTRONICA DIGITALE 
3 E MICROCOMPUTER 

44 gruppi di lezioni e 17 serie 
di materiali con oltre 870 
componenti e accessori. 

Compila e spedisci questo tagliando. 




Scuola Radio Elettra 

Via Stellone 5-10126 Torino 


^ Compila, ritaglia, e spedisci solo per informazioni a: X 96 I 

| SCUOLA RADIO ELETTRA-Via Stellone 5-10126 Torino I 

Vi prego di farmi avere, gratis e senza impegno, il materiale informativo relativo al Corso di: 


I □ Tecnica elettronica 

■ sperimentale (NOVITÀ) 

□ Elettronica digitale (NOVITÀ) 

□ Microcomputer (NOVITÀ’) 

□ Elettronica Radio TV 
(3 Elettronica industriale 


□ Televisione b/n 

□ Televisione a colori 

□ Amplificazione stereo 
D Alta fedeltà 

□ Strumenti di misura 


(Indicare con una crocetta la casella che interessa) 























Regressioni e previsioni 

Lezioni, seminari, conferenze ! 


Circuiti elettronici* 



MKRO-C6P 


Microcomputer Circuit 
flnalysis Program 


ANDREW THOMPSON 
SPECTRUM SOFTWARE 

WSTfOBOTED BY McGR/WV-HLL BOOK COMPANY 




Micro-Cap. Ideale per il progettista elettronico, è uno 
strumento che consente di disegnare il circuito direttamente sul monitor, 
attingendo da una libreria di componenti, e di simularne 
il funzionamento elettrico, rilevando le stesse misure e forme d'onda 
che un oscilloscopio ricaverebbe dal montaggio realizzato. In edizione 
originale americana, con manuale d'uso, Demo diskette, Data 
diskette e Program diskette, è disponibile per Apple//. Lire 990.000 + 
Iva (Abbonati ad Applicando lire 900.000 + Iva). 
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HyperGraphics. Ideale per chi deve 
creare conferenze, lezioni interattive, 
seminari, presentazioni di sicuro effetto con 
grafica, testi, suoni, colori, animazioni. 
In edizione originale americana. 
Lire 600.000 + Iva (Abbonati 
ad Applicando lire 550.000 + Iva). 

MicroTSP. Ideale per previsioni 
di vendite, analisi e previsioni dei costi, 
analisi finanziaria e previsioni 
macroeconomiche. Offre la possibilità 
di conservare, manipolare e 
\ trasferire serie di dati, applicando tutte 
* le più note tecniche statistiche. 

In edizione originale americana. 
Lire 600.000 + Iva (Abbonati 
ad Applicando lire 550.000 + Iva). 
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Ritagliare e spedire a: 
Editronica Srl, 

Corso Monforte 39, 
20122 Milano. 
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6068- 

60 

E6 

FF 

A5 

FF 

C9 

28 

90 

6070- 

FO 

60 

A5 

FE 

29 

IF 

48 

29 

6078- 

18 

85 

FB 

0A 

0A 

05 

FB 

0A 

6080- 

85 

FB 

68 

29 

07 

4A 

66 

FB 

6088- 

09 

20 

85 

FC 

18 

A2 

07 

A4 

6090- 

FF 

B1 

FB 

90 

82 

02 

A5 

FC 

6098- 

29 

IF 

09 

40 

85 

FC 

81 

FB 

60A0- 

90 

8A 

02 

A5 

FC 

29 

IF 

09 

60A8- 

20 

18 

69 

04 

85 

FC 

A5 

FD 

6QB0- 

C9 

40 

DO 

06 

BD 

8A 

02 

90 

60B8- 

82 

02 

CA 

10 

D2 

60 

AO 

07 

60C0- 

B9 

82 

02 

0A 

99 

82 

02 

88 

60C8- 

10 

F6 

A2 

06 

AO 

07 

89 

82 

6000- 

02 

0A 

99 

82 

02 

3E 

8A 

02 

6008- 

88 

10 

F3 

CA 

10 

EE 

A0 

00 

60E0- 

89 

8A 

02 

20 

56 

60 

C8 

CO 

60E8- 

07 

00 

F5 

60 





3) Stampa di una 

singola | 

pa- 

gina < 

[HGR) 

su 

Epson Mx-82. 

6000- 

A9 

1B 

20 

56 

60 

A9 

41 

20 

6008- 

56 

60 

A9 

08 

20 

56 

60 

A9 

6010- 

00 

85 

FE 

A9 

18 

20 

56 

60 

6018- 

A9 

48 

20 

56 

60 

EA 

EA 

EA 


6020- 

EA 

EA 

A9 

30 

20 

56 

60 

A9 

6028- 

02 

20 

56 

60 

A0 

20 

84 

FD 

603Q- 

A9 

00 

20 

61 

60 

A0 

40 

84 

6038- 

FD 

A9 

00 

20 

61 

60 

A 9 

0A 

6040- 

20 

56 

60 

E6 

FE 

A5 

FE 

C9 

6048- 

18 

DO 

C8 

A9 

18 

20 

56 

69 

6050- 

A9 

32 

20 

56 

60 

60 

08 

AE 

6058- 

CI 

CI 

30 

FB 

8D 

90 

CO 

28 

6060- 

60 

85 

FF 

20 

92 

60 

20 

BE 

6068- 

60 

E6 

FF 

A5 

FF 

C9 

28 

90 

6070- 

F0 

60 

A5 

FE 

29 

IF 

48 

29 

6078- 

18 

85 

FB 

0A 

0A 

05 

FB 

0A 

6080- 

85 

FB 

68 

29 

07 

4A 

66 

FB 

6088- 

09 

20 

85 

FC 

18 

A2 

07 

A4 

6090- 

FF 

B1 

FB 

9D 

82 

02 

A5 

FC 

6098- 

29 

IF 

09 

40 

85 

FC 

81 

FB 

6QAQ- 

9D 

8A 

02 

A5 

FC 

29 

IF 

09 

Ó0A8- 

20 

18 

69 

04 

85 

FC 

A5 

FD 

60B0- 

C9 

40 

DO 

06 

BD 

8A 

02 

9D 

6088- 

82 

02 

CA 

10 

D2 

60 

A0 

07 

60C0- 

B9 

82 

02 

0A 

99 

82 

02 

88 

60C8- 

10 

F6 

A2 

06 

A0 

07 

B9 

82 

60D0- 

02 

OA 

99 

82 

02 

3E 

8A 

02 

6QD8- 

88 

10 

F3 

CA 

10 

EE 

A0 

00 

6QE0- 

B9 

8A 

02 

20 

56 

60 

C8 

CO 

60E8- 

07 

DO 

F5 

60 





4) Stampa 

di due pagine 

af- 


fiancate (HGR-HGR2) su Ep¬ 
son Mx-82. 

Ancora 

serrature 

Ho apportato una modi¬ 
fica, che ritengo molto inte¬ 
ressante, al programma 
Agenda per renderlo prati¬ 
camente impenetrabile. È 
sufficiente cambiare la pista 
del catalog da 17 (come è 
normalmente) a 16 per mez¬ 
zo del comando POKE 
44033,16. In questo modo 
non potrà mai essere chiesto 
il catalog del disco passando 
da quelli normali, dato che 
così facendo non si otterreb¬ 
be nessuna indicazione. 

Se, poi, si volesse trasferi¬ 
re un programma al dischet¬ 
to protetto sarà necessario: 

• Fare il boot del disco 
normale 

• Dare il load al programma 
da copiare 

• Scrivere “POKE 
44033,16” 

• Inserire il disco protetto 

• Salvare il programma con 
il semplice SAVE 

• Scrivere POKE 44033,17, 
tornando così al catalog 
normale. Daniele Cossu, 

Roma 


PERSONAL 

VIDEO 300 
ANTIRIFIESSO 


3 UT* 17 POH 34,16 DHL -936 

jf PRIHT WRBS''RETURH' KEY TO BEGIH COPY INPUT 1 M* 

B °UT* 5 °HTM24 IHUERSE^fflHT 'REAOIHG 1 

5 REJ1 ERROR' 

5 UT* 5- UT* 24 PRIHT ‘ 1 IF PEB ( 713) = 1 Tffii 298 

;« IF FT THEH 255 UBI HOT FIRST PO 
« ORI = ‘DUPLICATE 1 GQSUB368 RED GET OUP DISK 

5 (ME* GOTO 275 

6 'JT« 8 HTftB 24 IHUERSE *IHT 1 IHITIf4IZIKG 1 HORHAL 

« PRIHT ’IHIT HH.SVSSAD'ìSDìVV 1 , PEB (714) FT = 1 

1 UT* 8 HT* 24 PRIHT * 

2 POH 216,8 POTÈ 222,0 

3 GOTO 256 

5 OTI = 'DUPLICATE 1 GOSUfi 368 REA GET OUP DISX 

6 UT* 8 HT* 24 IHUERSE PRIHT ‘HRITINGV NORHAL PRIHT 1 1 

8 DALL 710 R£H «ITE A KUKT 

5 'UT* 8 HT* 24 PRIHT 1 
8 IF PEB (713) < > 2 THEH 198 
5 IF PEB < 222) = 255 THEH STOP 

7 UT* 18 IHUERSE PRIHT 'tOTO UHAffli TO «ITE UUtV GOTO 238 


La serie dei monitori AMDEK 12" VIDEO-300 sono 
stati progettati per una semplice operatività. 

I monitori Amdek sono compatibili con i seguenti 
computers: Apple//, Commodore 64, PC IBM, Atari, 
TRS-80 e molti altri con segnale d'uscita video 
composito; questo consente di riprodurre testi od 
immagini con estrema nitidezza. Il design moderno 
del video 300 valorizza il vostro computer. Lo 
scherma antiriflesso consente lunghi periodi di lavoro 
senza affaticamento visivo grazie anche all'utilizzo 
di fosfori ambra o verdi. 

La caratteristica 
tecnica del 
video 300 è la sua 
altissima risoluzione 
che supera le 900 
righe al centro (18 MHz), 
consentendo così immagini chiare ed incise per una 
maggiore leggibilità. 

II video 300 è leggero, trasportabile e dotato di 
mobile costruito con criteri industriali con maniglia di 
trasporto incorporata. 

CARATTERISTICHE 

• Fosfori verdi o ambra 

• Schermo antiriflesso 

• Banda passante 18 MHz 

• Risoluzione: 900 righe al centro 

• Peso: Kg. 7 
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quanto 



In queste pagine Applicando pubblica i listini prezzi aggiornati 
dei prodotti Apple comunicati dalla Apple Computer, Via Bo¬ 
vio 5, 42100 Reggio Emilia. 

Listino in vigore dal 2 giugno 1984.1 prezzi non comprendono 
le spese di installazione. 


APPLE //C 


Prezzo 
IVA esci. 


Prezzo 
IVA comp. 


Apple //c . 2.399.350 2.831.233 

Personal Computer Apple //c: compatto e 

completo. 

Il sistema comprende: 

— memoria da 128 Kbyte RAM e 16 Kbyte 
ROM 

— tastiera italiana professionale 

— visualizzazione dei testi a 80 colonne su 24 
righe 

— grafica ad altissima risoluzione e colore 

— unità a disco da 5”1/4 integrata 

— connettore per unità a disco aggiuntiva 

— due connettori seriali per stampante e 
modem 

— uscita video per Monitor B/N 

— uscita video RGB e per visore a pannello 

— modulatore PAL per collegamento al TV 

— software di base residente 

— monitor, disassembler, BASIC esteso AP¬ 
PLESOFT 

— 7 programmi dimostrativi più un disco di 
Utilities. 


UNITÀ VIDEO 

Monitor //c . 365.000 430.700 

Video 9 pollici fosfori verdi per Apple //c. 


Supporto Monitor . 

Dispositivo accessorio del Monitor //c che ne 
permette la sistemazione ottimale sul compu¬ 
ter //c consentendone inoltre l’orientamento. 


72.000 


84.960 



Prezzo 
IVA esci. 

Prezzo 
IVA comp. 

ALTRE UNITÀ PERIFERICHE 

HandController. . 

Due manopole di controllo comprensive di pul¬ 
sante. 

60.000 

70.800 

Joystick . 

Leva di comando per fornire direttamente al 
computer input di posizione in coordinate X- Y. 

106.000 

125.080 

Mouse per Apple//c . 

Comprende il dispositivo di colloquio detto 
"Mouse” ed il programma grafico Mouse 
Paint. 

190.000 

224.200 

ACCESSORI 

Borsa Apple//c . 

75.000 

88.500 

PROGRAMMI APPLICATIVI APPLE 

Apple Works //c (Tre per te) . 

Programma integrato per scrivere, calcolare e 

420.000 

495.600 


archiviare. 

A ccess // . 150.000 177.000 

Permette di utilizzare l’Apple//c come sistema 
di ricezione e trasmissione verso banche dati o 
altri personal computer. 


LINGUAGGI DI PROGRAMMAZIONE 

Logo 128 . 190.000 224.200 

Una nuova e potenziata versione del famoso 
linguaggio educativo. 


APPLE //E 


UNITÀ DI MEMORIA 

Disk//C . 599.000 706.820 

Unità di memoria aggiuntiva per floppy disk da 
5” 1/4 con capacità da 140 Kbyte. 


UNITÀ DI SCRITTURA 

Scribe . 549.000 647.820 

Stampante da 8 pollici, con possibilità grafiche 
e di stampa colore (fino a 7). Il processo di 
stampa è a trasferimento termico su comune 
carta in modulo singolo e/o continuo. 

Image Writer 80 colonne . 1.100.000 1.298.000 

Stampante grafica da 8 pollici che permette di 
utilizzare foglio singolo o modulo continuo. La 
velocità di stampa è di 180 cps in modo grafico 
e di 120 cps in modo testo; il percorso è bidire¬ 
zionale ottimizzato. 

Plotter Apple . 1.850.000 2.183.000 


Apple//e . 1.399.350 1.651.233 

Sistema di elaborazione professionale Apple 
//e, comprensivo di: 

—Memoria da 64 Kbyte RAM e 16 Kbyte ROM 

— Tastiera italiana con maiuscole e minuscole 

— Interfaccia per registratore a cassette 

— Segnale di uscita video B/N e colori PAL 

— Software di base residente 

— Monitor, Disassembler, BASIC esteso AP¬ 
PLESOFT 


ESPANSIONI 

Scheda 80 colonne . 

Permette all’Apple //e di visualizzare i testi su 
80 colonne 

Scheda 80 colonne con espansione di me - 
morìa . 

Espansione della memoria del computer Ap¬ 
ple//e a 128 Kbyte totali, e visualizzazione dei 
testi su 80 colonne 


225.000 265.500 


4C5.000 572.300 

























Prezzo Prezzo 
IVA esci. IVA comp. 

UNITÀ VIDEO 

Monitor//e . 365.000 430.700 

Video a 12 pollici, fosfori verdi per Apple //e 


UNITÀ DI MEMORIA 


Prezzo Prezzo 
IVA esci. IVA comp. 

L’interfaccia richiesta è di tipo seriale (cod. 

115-01) 

È necessario il set di cavi (cod. 122-08) 

PlotterApple . 1.850.000 2.183.000 

L’interfaccia richiesta è di tipo seriale (cod. 

115-01) 


DiskH, drive e doppio controller . 700.000 826.000 

Unità di memoria per floppy disk da 5,25 polli¬ 
ci, con capacità di 140 Kbyte per ogni floppy. 

L’unità è comprensiva della scheda di interfac¬ 
cia per Apple //e, che permette di collegare 
anche un secondo drive aggiuntivo. 

L’Apple //e permette il collegamento di 6 drive 
con controller e 6 drive aggiuntivi, nella confi¬ 
gurazione massima. 

Disk//, drive aggiuntivo . 600.000 708.000 

Unità di memoria per floppy disk da 5,25 polli¬ 
ci, con capacità di 140 Kb per ogni floppy. 

L’unità aggiuntiva necessita del controller, for¬ 
nito nella confezione del disk//drive e doppio 
controller 


ALTRE UNITÀ PERIFERICHE 

Hand controller// . 60.000 70.800 

Due manopole di controllo comprensive di pul¬ 
sante. 

Joystick// . 106.000 125.080 

Leva di comando per fornire direttamente al 
computer Apple//e input di posizione in coordi¬ 
nate X-Y. 

Numeric keypad//e . 298.000 351.640 

Tastierino numerico per Apple //e, completo 
ed interfacciato 


DuoDisk . 1.150.000 1.357.000 

Doppia unità di memoria per floppy disk da 
5,25 pollici con capacità di 140 Kbyte per ogni 
floppy. Per il collegamento ad Apple //è fornito 
il kit di interfaccia relativo. 


Tavoletta grafica per Apple //e . 1.450.000 1.711.000 

Mouse per Apple //e . 270.000 318.600 

Comprende il mouse, l’interfaccia per Apple 
//e ed il programma grafico Mouse Paint. 


ProFile . 2.700.000 3.186.000 

Unità di memoria basata su disco rigido (Win¬ 
chester) da 5 Megabyte. Per il collegamento 
ad Apple // è fornito il relativo kit di interfaccia. 

UNITÀ DI SCRITTURA 

Silentype//e . 750.000 885.000 

Stampante termica da 80 colonne con capaci¬ 
tà grafiche. 

La confezione comprende l’interfaccia ed i ca¬ 
vi di collegamento all’Apple //e. 

Image Writer80colonne . 1.100.000 1.298.000 

Stampante grafica da 8 pollici che permette di 
utilizzare foglio singolo o modulo continuo. 

Stampa in normale, compresso, grassetto e 
proporzionale inoltre permette la stampa di 
grafici ad alta risoluzione. 

La velocità di stampa è di 180 cps in modo 
grafico e di 120 cps in modo testo; il percorso è 
bidirezionale ottimizzato. 

L’interfaccia richiesta è di tipo seriale, (cod. 

115-01). 


INTERFACCE 



Super interfaccia seriale per Apple//e . 

Scheda di interfaccia seriale RS232 utilizzabi¬ 
le per il collegamento di stampanti e linee di 
comunicazione. 

250.000 

295.000 

Interfaccia parallela universale per Apple 

//e . 

Scheda di interfaccia che permette il collega¬ 
mento di unità periferiche con standard paral¬ 
lelo e Centronics. 

300.000 

354.000 

Scheda interfaccia IEEE488per Apple//e 

841.000 

992.380 

Scheda prototyping hobby per Apple//e . 

43.000 

50.740 

ACCESSORI 



Trascinatore modulo continuo per stam¬ 
pante a margherita ... 

500.000 

590.000 


Image Writer 132 colonne ... 1.400.000 1.652.000 

Stampante grafica da 15 pollici le cui caratteri¬ 
stiche, tranne la larghezza, sono simili alla 
Image Writer 80 colonne. L’interfaccia richie¬ 
sta è di tipo seriale ed è necessario ordinare il 
set di cavi (cod. 122-10). 

Stampante a margherita Apple . 3.636.000 4.290.480 

Per ottenere stampe di documenti e corrispon¬ 
denza di elevata qualità. La spaziatura fra i 
caratteri è selezionabile: 10, 12, 15 caratteri 
per pollice. La velocità è di 40 caratteri al se¬ 
condo ed il percorso è bidirezionale ottimiz¬ 
zato. 


PROGRAMMI APPLICATIVI 

Apple Writer //e in italiano . 310.000 365.800 

Sistema di videoscrittura 

QuickFile//e ... 180.000 212.400 

Gestione archivi ed indirizzari 


Business Graphics// . 320.000 377.600 

Sistema di elaborazione e creazione di grafici. 

Multiplan per Apple //e . 560.000 660.800 

Sistema di calcolo basato su foglio elettronico 
suddiviso in elementi mutuamente correlabili. 
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UTILITIES 



Prezzo Prezzo 


Prezzo 

Prezzo 


IVA esci. IVA comp. 


IVA esci. 

IVA comp. 

DI PROGRAMMAZIONE ED 


* Set di manuali Apple Writer //e** . 

49.000 

57.820 



PRODOS Technical Reference Manual . 

50.000 

59.000 


Apple Pascal//e . 

450.000 

531.000 

Apple Fortran . 

360.000 

424.800 

Super Pi fot . 

360.000 

424.800 

Co-Pilot . 

65.000 

76.700 

Apple Logo . 

320.000 

377.600 

Raccoglitore Apple Work Bench . 

16.000 

18.880 

DOS Programmers Tool kit . 

150.000 

177.000 

PRODOS Assembler Toois . 

100.000 

118.000 

Apple // Pascal Numeric Sane . 

70.000 

82.600 

PRODOS USER’S kit . 

90.000 

106.200 

BASIC PROGRAMMINO WITH PRODOS . 

60.000 

70.800 

APPLESOFT PROGRAMMERS kit . 

100.000 

118.000 

Apple NPL// . 

1.050.000 

1.239.000 

Apple/ZeplotterPIK . 

195.000 

230.100 

SPECIAL DELIVERY SOFTWARE 



Apple Project Manager . 

470.000 

554.600 

Pascal Animation Tool ... 

151.000 

178.180 

Personal Finance . 

151.000 

178.180 

VT-IOOEmuìator . 

151.000 

178.180 

DOCUMENTAZIONE 



* Manuale utente dell’Apple //e** . 

25.000 

29.500 

Manuale di introduzione al linguaggio Ap¬ 
plesoft //e** . 

25.000 

29.500 

Manuale del linguaggio Applesoft//e . 

30.000 

35.4000 

Set di manuali Applesoft //e (125-25 e 
125-26) . 

50.000 

59.000 

Manuale del sistema Apple//e . 

30.000 

35.400 

Applesoft II Reference Manual**.. . 

21.000 

24.780 

Apple II Reference Manual** . 

42.000 

49.560 

Apple Integel Basic Programming Ma¬ 
nual** ... 

15.000 

17.700 

* Apple Pascal Reference Manual . 

39.000 

46.020 

* Apple Pascal Operating System Manual 

45.000 

53.100 

6502Programming Manual . 

30.000 

35.400 


Manuali già inclusi nel prezzo delle singole 
parti, ma ordinabili anche separatamente. 
Disponibili in lingua italiana. 

MACINTOSH 


Macintosh . 4.499.350 5.309.233 

Personal Computer Macintosh per la scrivania 
degli anni ’80. 

Il sistema comprende: 

— unità centrale “32 bit” 128 K RAM e 64 K 
ROM 

— video ad altissima risoluzione 

— unità a disco semirigido da 3.5” per 400K 
bytes integrata 

— tastiera removibile 

— mouse 

— due interfacce seriali RS422/RS232 Ap- 
pleBus compatibili 

— interfaccia per unità a disco esterna 

— scatola contenente disco di sistema, disco 
vuoto, disco di visita guidata per l'istruzio¬ 
ne all’uso del sistema, audiocassetta per 
visita guidata, manuale utente. Il tutto in 
lingua italiana. 

— scatola software applicativo contenente di¬ 
sco Write/Paint, disco vuoto, disco di visita 
guidata per l’istruzione all’uso delle due 
applicazioni, audiocassetta per visita gui¬ 
data, manuale MacPaint, manuale Mac 
Write. Il tutto in lingua italiana. 

Macintosh512Kb . 5.990.350 7.068.613 

ESPANSIONI 

Scheda di memoria aggiuntiva da 512 Kb 2.000.000 2.360.000 

UNITÀ DI MEMORIA 

Unità disco esterna . 880.000 1.038.400 

Unità aggiuntiva per disco semirigido da 3:5” 
per 400K bytes. 

UNITÀ DI SCRITTURA 

imageWriter 80 colonne . 1.100.000 1.298.000 

Stampante grafica da 8 pollici che permette di 
utilizzare foglio singolo o modulo continuo. 

ALTRE UNITÀ PERIFERICHE 

Numeric Keypad . 180.000 212.400 


ACCESSORI 
Borsa Macintosh 


180.000 212.400 


LISA 


Lisa2 .. 5.900.350 6.962.413 

Sistema di elaborazione a 32 bit comprenden¬ 
te: 512 Kbyte di memoria centrale, video, ta¬ 
stiera, mouse e un drive 3.5” con capacità da 
400 Kbyte. Il Lisa 2 diventa un Lisa 2/5 aggiun¬ 
gendo l’unità di memoria esterna ProFile. 












































Prezzo Prezzo 
IVA esci. IVA comp. 


Lisa2/5 . 7.900.350 9.322.413 

Sistema di elaborazione a 32 bit comprenden¬ 
te: 512 Kbyte di memoria centrale, video, ta¬ 
stiera, mouse, un drive 3.5” con capacità da 
400 Kbyte e l’Hard disk ProFile esterno da 5 
Megabyte. 

Lisa2/10 . 9.900.350 11.682.413 

Sistema di elaborazione a 32 bit comprenden¬ 
te: 512 Kbyte di memoria centrale, video, ta¬ 
stiera, mouse, un drive 3.5” con capacità da 
400 Kbyte e un Hard disk da 10 Megabyte 
integrato nel sistema. 


ESPANSIONI 

Scheda di memoria aggiuntiva da 512 Kby¬ 
te . 2.900.000 3.422.000 

Permette l’espansione della memoria dei Lisa 
ad un Megabyte. Con tale scheda i Lisa della 
serie "2” possono ospitare l’office System e 
quindi le applicazioni per ufficio. 


UNITÀ 01 MEMORIA 

ProFile . 2.700.000 3.186.000 

Unità di memoria aggiuntiva da 5 Megabyte 
basato su disco rigido (Winchester). Collegato 
a Lisa 2/5 e 2/10, richiede l’interfaccia parallela 
(010-10) che permette di connetterne due alla 
volta. 


UNITÀ DI SCRITTURA 

Image Writer 80 colonne . 1.100.000 1.298.000 

Stampante grafica da 8” che permette di utiliz¬ 
zare i fogli singoli o il modulo continuo. La 
velocità di stampa è di 180 cps in modo grafico 
e 120 cps in modo testo, mentre il percorso è 
bidirezionale ottimizzato. Il collegamento è di 
tipo seriale. 


Stampante a margherita Apple . 

Per ottenere stampe di documenti e corrispon¬ 
denza di elevata qualità. La velocità è di 40 
caratteri al secondo ed il percorso è bidirezio¬ 
nale ottimizzato. Il collegamento è di tipo se¬ 
riale. 

3.636.000 

4.290.480 

Confezione 6 margherite tipo C. 10 . 

Margherita tipo Courier 10 

150.000 

177.000 

Confezione 6 margherite tipo G. 15 . 

Margherita tipo Gothic 15 

150.000 

177.000 

Confezione 6margherite tipo B.P. . 

Margherita tipo Boldface Proporzionale 

150.000 

177.000 

PROGRAMMI APPLICATIVI 



LisaCalc . 

LisaDraw . 

Lisa Graph . 

LisaWrite . 

LisaList . 

550.000 

710.000 

550.000 

550.000 

350.000 

649.000 

837.800 

649.000 

649.000 

413.000 




Prezzo Prezzo 
IVA esci. IVA comp. 


LisaProject . 710.000 837.800 

LisaTermlnal . 560.000 660.800 

Lisa Office Software 3.658.000 

(Sistema Operativo e 6 applicativi: da 02 a 

07) . 3.100.000 

Richiede 1 Megabyte di memoria interna 

ESPANSIONI DI SISTEMA 

Fortran 80 Microsoft per Scheda Z80 . 456.000 538.080 

Basic Compiler Microsoft per Scheda Z80 . 863.000 1.018.340 

ALDS Microsoft (sistema di sviluppo per pro¬ 
grammi Assembler8080, Z80 e 6502) . 292.000 344.560 

Scheda orologio calendario CCS . 280.000 330.400 

Arithmetic Processor CCS . 1.114.000 1.314.520 

TASCMicrosoft (compilatore Applesoft) . 409.000 482.620 

INTERFACCE 

Modulatore UHF . 82.000 96.760 

Interfaccia IR ET standard Centronics . 155.000 182.900 

Interfaccia CCS parallela . 292.000 344.560 

Interfaccia CCS seriale RS232-C . 347.000 409.460 

Interfaccia Colore Apple II per Monitor Hanta- 

rex . 104.000 122.720 

Interfaccia Seriale sincrona CCS . 479.000 565.220 

Interfaccia Centronics con Buffer SET . 400.000 472.000 

Scheda CCS GPIB IEEE488 . 662.000 781.160 

Scheda CCS A/D con verter BCD . 269.000 317.420 

Controller per Drive 8” FAST Singola densità 402.000 474.360 

Controller + Software per compatibilità IBM su 

8” singola densità . 770.000 908.600 

Controller per Drive 8” DD-DF con cavo per 

Apple II plus . 973.000 1.148.140 

Controller per Drive 8” DD-DF con cavo per 

Apple//e . 995.000 1.174.100 

Interfaccia grafica per stampante IR ET 80-132 

colonne . 238.000 280.840 

Interfaccia e cavo Hantarex per Apple//e . 60.000 70.800 

MISCELLANEA 

Alimentatore tampone . 290.000 342.200 

DOCUMENTAZIONE 

32 Programmi per Apple (Franco Muzzio Edit.) 9.314 9.500 


SOFTWARE 






Personal Data Base 5” . 72.000 84.960 

Personal Data Base 8” . 82.000 96.760 

Personal Filing System per Apple II . 244.000 287.920 

Personal Report System per Apple II . 217.000 256.060 

Programming AIDS 3-3 . 209.000 246.620 

Personal Filing System per Apple III . 299.000 352.820 

Personal Report System per Apple III . 262.000 309.160 

PTERO (Cominfor) Word processing . 190.000 224.200 

P.F.S. Graphics// . 244.000 287.920 

P.F.S. Graphics/// . 341.000 402.380 

P.F.S. Data Saver . 117.000 138.060 

Personal Filing System per Apple //e . 244.000 287.920 

Persona I Report System per Apple //e . 244.000 287.920 

Personal Filing System Graph per Apple //e .... 244.000 287.920 

Dossier (Mondadori) . 549.020 560.000 

Fisica Ottica (Mondadori) . 147.059 150.000 

Logica simbolica (Mondadori) . 127.451 130.000 

Dedalus (Mondadori) . 58.824 60.000 

CFS file (Data Base Cominfor) . 200.000 236.000 


























































ritrova 
anche qui 

Ecco un elenco dei computer shop presso i quali è possibile abbonarsi ad Applicando, 
acquistare una copia, cercare un numero arretrato... 


Almé 

Elcod Viale Italia 45/A 
Aosta 

Informatique sas di Eddy Ottoz 
Av. Conseil des Commis 14 

Avezzano 

Aspron Via America 10/12 
Barano d’Ischia 
Matterà Antonio Via Roma 61 


Via Malta 12 

Il Computer srl Via B. Croce 23 
Personal Data di Tamiozzo D. 
Via Brozzoni 4 

Catania 

Centro Informatica sdf 
Via Torino 55 
Computer Shop 
Via E. Orlando 164 
SI.EL Informatica snc Via 
Etnea 289 


Bari 

L. e L. Computers srl 
Largo 2 Giugno 4 

Bassano del Grappa 
A Tre snc di Arcangeli e C. 
Via Buonarroti 23 


Catanzaro 
Visicom srl ® 

Via Minniti Ippolito 10 

Chieti 

Computer Point sas 
Viale Unità d’Italia 5 


Benevento 
Masone Informatica 
Viale dei Rettori 57 

Bergamo 

Studio 15 srl Via Quarenghi 60 
Biella 

Consul Computer srl 
Via delle Rose 2 

Bologna 

CEDA Minicomp srl 
Piazza Aldrovandi 2/2 
Computer Systems 
Via Ercolani 10/D 
EDP Sistemi BO srl 
Viale Pietramelara 61/F 
SERCOM Via B. da Carpi 9/B 

Borgo a Buggiano 

CO-DI snc di G. Gatti-Chiti 
Via 24 Maggio 117/119 

Brescia 

Brescia Computers srl 


Como-Aitate 

Accaesse Informatica srl 
Via Acquanera 46 

Conegliano 

Computing Program di Branca 
Via G. Piovesana 32 

Cosenza 
Micro Systems sdf 
Via Pane Bianco 26 

Ferrara 

Crepaldi Giuseppe 
Via T. Speri 5 
Mazzacurati Claudio 
Viale Cavour 186/188 

Firenze 

Anfrel Informatica sas di F. 
Giagnoni e C. Via Masaccio 50 
Elettronica Cento Stelle srl 
Via Cento Stelle 5/B 
Paoletti Ferrerò Via il Prato 
40/42 R 

Pascal Tripodo Elettronica 


Via B. della Gatta 26/28 
Soluzioni EDP srl 
Corso dei Tintori 39R 

Foggia 
GECO, srl 

Via Valentini V. Franco 1 
Forlì 

A-Z Computer srl 
Via Cignani 7 

Kronos Via Oreste Regnoli 30 
Genova 

Computer Center 
Via San Vincenzo 129 r 
SALS Informatica srl 
Via D’Annunzio 2/35 

Gioia Tauro 

Tecnocomp snc di Cutellé F.e 

R. Via Nazionale SS 111/117 

Jesi 

E.M.J. sas Via F. Conti 4 
New Computer srl 
Via N. Sauro 17/A 

L'Aquila 

S. E.A.D. srl via G. di Vincenzo 

Lanciano 

Electronic Microsystems 
Via della Pace 3 

Lavagna 

CR2 Informatica snc 
Corso Genova 100 

Lecco 

Computers Lecco snc 
Via Nino Bixio 18/B 

Manduria 

De Pasquale Ottavio 
Via per Oria 80 


Massa 

Euro Computer sas 
Piazza C. Bertagnini 4 

Matera . 

Lucana Sistemi srl 
Via Don Minzoni 4 

Messina 

Cubeta srl Via Cardines 12/14 

Milano 

A. G. Informatica srl 
Via G. Silva 49 
Basic Computers 
Via Friuli 26/A 

Deltron srl Viale Gran Sasso 50 

Edelektron srl 

Corso Sempione 39 

Happy System Piazza Diaz 6 

All’Informatica Shop 

Via Lazzaretto 2 

Microtech Sistemi 

Via Bronzetti 20 

SH Computers srl 

Viale Montenero 33 

Softec Computer 

Viale E. Jenner23 

Milazzo 

Tectron Tecnologie Elet. srl 
Via dei Mille 

Mirano 

Saving Elettronica di Miatto 
Via Gramsci 40 

Modena 

Masetti Elettronica srl 
Via Emilia Centro 211 

Monza 

ESI srl Via Cavallotti 11 
Nikom Electronics 
Via Asiago 7 


Napoli 

Computer Systems srl 
Via G. Santacroce 40 
Golden Computer srl 
Via Michelangelo 7 
I.C. International Computer 
Viale A. Gramsci, 176 
La Barbera Carlo sas 
Via Toledo 320 

Nardo 

Salco srl Via XX Settembre 122 

Padova 

Capo villa e C. sas 
Galleria Scrovegni 5 
Computer Service srl 
Via Beethoven 3 
E.D.P. Sistemi srl 
Via Borromeo 16 

Palermo 

Informatica Commerciale spa 
Via Notarbartolo 26 

Pavia 

M.A.S.H. Computer Systems 
Strada Nuova 86 
Senna Gianfranco snc 
Via Calchi 5 

Pinerolo 

Elaborazione Dati Pinerolo 
Corso Piave 42 

Pisa 

Società Elettronica Tirrena 
Via Fucini 20 

Pistoia 

Inter Systems 

Via Pietro Mascagni 14 

Pontedera 

Data Port srl 

Via Brigate Partigiane 27 

Reggio Emilia 
Computer Center srl 
Via D. Alighieri 4 

Roma 

Computer Center srl 
Via Nizza 48/52 
Computerart srl 
Via Michele di Landò 41 
Easy Byte 

Via Giovanni Villani 24 
E.D.P. Market 
Via E. Fermi 116/118 
E.M. EUR Micro Computer srl 
Viale C. Pavese 267 

5.1. G.E.E.I. srl 

Via Nomentana 265-273 

5.1. PR.EL. srl 

Via Pompeo Magno 94 

Roma EUR 
Bit Computers 
Via F. Domiziano 10 

Salerno 
SEDA srl 

Via Parmenide c/o Iannone 
Sanremo 

A.E.S. Assemb. Elettr. 

S. Remo Via Volta 24 


Savona 

Briano snc Corso Tardy e 
Benech 20 r 

Scandiano 

Informatica System di Cheli 
Via Diaz 11/D 

Segrate 

Compusoft di R. Massaroli 
Via Milano 2 - Resid. Lago 

Sestri Ponente - Genova 
All Computer sas 
ViaC. Menotti 136 r 
Spezzano Albanese 
Via Stragolia 48 

Torino 

A.B.Computer sas 
Corso Grosseto 209 
Digitalsync snc 
Corso Moncalieri 303 
GE.NE.CA. srl Via Bertola 5 
Hobby Elettronica 
Via Saluzzo 11/F-G-H 
Omicron Computers snc 
C.so Duca degli Abruzzi 14 
Pinto G.-Componenti elettr. 
Corso Principe Eugenio 15 bis 
Tecnosystem Computer Shop 
Via Beaumont 10 
Tekno Computers srl 
Via Madama Cristina 31/c 

Torrette di Ancona 
Sisteda srl via Velino 5 

Trapani 

Gualano Eugenio 
Via Virgilio 11 

Trento 

SI.GE. snc di Casagrande 
Via Cesare Abba 2 

Treviso 

A5 Computers srl 
Borgo Cavour 37/A 

Udine 

BIT Computers 
Via Pozzuolo 107 

Varese 

IRPE srl Via Morazzone 8 
Venezia 
AZ Telemarket 
Cannaregio 5898 

Verona 

ARMUsrl 

Via Teatro Filarmonico 3 
Esacomp srl Via Roveggia 43 
MOS 80 sas Via Germania 21 

Vicenza 

Sevi sas Via S. Agostino 87 

Villafranca 
Studio 4 

Corso Vitt. Emanuele 70 
Viserba di Rimini 
Computer Center 
Via Pallotta 25/A 


oppio computer 


computer shop 
centro dimostrativo 
Apple //c, //e, Macintosh e Lisa 
accessori e periferiche 
materiali di consumo 
software per tutte le esigenze 
assistenza tecnica 
corsi regolari a tutti 1 livelli 
consulenza 

vendita, affitto, leasing 


JdO 


Informatica 


Computer Shop 

viale Brigate partigiane 132 r. 
Genova 


Programmazione, 
Assistenza e Corsi 

Via G. D’Annunzio 2/46 
Genova 

TeL (010) 569327-592627 


'oppio computar 
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Listati senza fatica 

I programmi pubblicati su Applicando possono es¬ 
sere trascritti dai lettori e salvati su dischetto. Ma la 
trascrizione è lenta e noiosa. Chi lo desidera può 
richiederci i dischetti sotto indicati, già pronti. 


★ AP4 N07. Dischetto con i programmi 
LETTURA SPRINT in versione italiana e 
LETTURA SPRINT con frasi in inglese 
(pag. 26), ROMPIQUINDICI (pag. 47), 
TASTIERINO FANTASMA (pag. 73), e 
ROUTINE Di INPUT (pag. 76). Lire 
30.000 (Abbonati Lire 25.000). 

AP4/A08. Dischetto dati VisiDex BAN¬ 
CA DATI APPLE (pag. 41). Occorre Visi¬ 
Dex. Lire 30.000 (Abbonati Lire 25.000). 


AP4 A09. Dischetto Pascal (occorre 
Language Card o Apple e) con i pro¬ 
grammi ORGANO, VIOLINO, PIANO¬ 
FORTE (pag. 21). Lire 30.000 (Abbonati 
Lire 25.000). 

★ AP3 IN05. Dischetto con i programmi 
SISTEMA BASE (pag. 14), ETICHETTE 
(pag. 36). CONTRATTI (pag. 58). DADI E 
PUNTI (pag. 67) e GRAN CATALOGO 
(pag. 82). Lire 30.000 (Abbonati Lire 
25.000). 

AP3 A06. Dischetto dati VisiCalc EQUO 
CANONE (pag. 44). Occorre VisiCalc. 
Lire 25.000 (Abbonati Lire 20.000). 

★ AP1/I02. Dischetto con i programmi 
PROFITTI PER FAVORE (pag. 38). CA¬ 
LENDARIO PERPETUO (pag. 54), e I 
TRONCHI DEL TESORO (pag. 66). Lire 
30.000 (Abbonati Lire 25.000). 

AP6/N11. Dischetto con il programma: 
STRESS (pag. 45). Lire 55.000 (Abbona¬ 
ti lire 45.000). 



AP5/N08. Dischetto con il programma 
INVESTOR (pag. 34) Lire 70.000 (Abbo¬ 
nati Lire 60.000). 

* AP8/N13. Dischetto con i programmi: 
CAMBIA COMANDI E MESSAGGI (pag. 
24); LE MANS (pag. 35); APPLE ORGA¬ 
NO (pag. 51). Lire 30.000 (abbonati Lire 
25.000). 

★ AP8/T14. Dischetto con i programmi: 
MOMENTO DI UNA FORZA e COLPO 
ALL’ASTA (Appliscuola, pag. 27); 
HARD COPY DELLE PAGINE IN ALTA 
RISOLUZIONE (pag. 70). Lire 30.000 
(abbonati 25.000). 


★ AP9/N15. Dischetto con i program¬ 
mi: FUOCO FATUO (pag. 27); APPLE 
ARTISTA (pag. 67); DATA.HELLO (pag. 
74). Lire 25.000 (abbonati 20.000) 

★ AP9/T16. Dischetto con i programmi : 
SISTEMA DI FORZE PARALLELE (Ap¬ 
pliscuola pag. 44); TRASLAZIONE E 
ROTAZIONE DI UNA FIGURA PIANA 
(Appliscuola pag. 52). Lire 30.000 (ab¬ 
bonati 25.000) 

★ API N03. Dischetto con i programmi 
ELIMINATORE DI DOS (pag. 28), ORO¬ 
LOGIO (pag. 44), e PRONTI PUNTARE 
FUOCO! (pag. 46). Lire 30.000 (Abbonati 
Lire 25.000). 

★ AP2/IN04. Dischetto con i programmi 
COSTI CHILOMETRICI (pag. 14). RI¬ 
CHIAMA FIGURE (pag. 44). LASER NEL¬ 
LO SPAZIO (pag. 46), e CURVE DI 
PRESSIONE (pag. 57). Lire 30.000 (Ab¬ 
bonati Lire 25.000). 

★ AP5/N09. Dischetto con i programmi 
AGENDA PERSONALE (pag. 23), DUEL¬ 
LO D ARTIGLIERIA (pag. 30), MELE E 
FRECCETTE (pag. 63). Lire 30.000 (Ab¬ 
bonati Lire 25.000). 

★ AP6/N10. Dischetto con i program¬ 
mi: OBBLIGAZIONI - BOND MANAGER 
(pag. 27) PUCMAN - NIBBLER (pag. 39) 
e LINEFINDER (pag. 55). Lire 30.000 (ab¬ 
bonati lire 25.000). 

★ AP7/N12. Dischetto con i program¬ 
mi: APPLE PITTORE (pag. 18), OTTO¬ 
VOLANTE (pag. 27), DISK-BLOCK (pag. 
33), ARCHIVIO PER APPLE (pag. 35), 
DISCOTECA (pag. 59), AIUTO (pag. 74). 
Lire 30.000 (Abbonati lire 25.000). 

★ I dischetti contrassegnati con asterisco 
contengono anche il programma TOM3GLA, 
omaggio natalizio di Applicando e di Compu- 
shop. Via Nomentana 265-273, Roma. 


Compilare e spedire il tagliando qui sotto a Applicando , Editronica Sri., Corso Monforte 39, 20122 Milano 
Vogliate inviarmi i seguenti dischetti: 


n.. 


n.. 


n.. 


n. 


1 A 1 P 

1 l/l 1 1 1 

1 A 1 P 

1 l/l 1 1 1 

lAlPl 

1 l/l 1 II 

|A|P| 

1 l/l 1 1 1 

|A|P| 

1 l/l 1 1 1 

|A|P| 

1 l/l 1 1 1 

[AlPl 

1 l/l 1 1 1 


n.. 

Sono abbonato: sì □ no □ 


Cognome.Nome... 

Via...Cap. 

Città.Prov.. 

Scelgo la seguente formula di pagamento: 

□ allego assegno di L.non trasferibile intestato a Editronica srl. 

□ allego ricevuta versamento di L.sul cc/p n. 19740208 intestato a 

Editronica srl - Corso Monforte, 39 - 20122 Milano 

□ pago fin d’ora l’importo di L.con la mia carta 

di credito BankAmericard N..,.» 

scadenza.autorizzando la Banca 

d’America e d’Italia ad addebitarne l’importo sul mio conto BankAmericard. 


Data.....Firma. 





































IH UH FLOPPY DISK DIASPROH 
LE QUALITÀ SUPERFICIALI 
SOHO LE PIU' PROFONDE. 


E' dalla superficie che si giudica un 
floppy disk, ma solo un'analisi ap¬ 
profondita permette di apprezzar¬ 
ne le qualità. 

Trattamento "Coating Extra": ri- 

vestimento di ossido magnetico, 
addittivato con lubrificante ad al¬ 
ta protezione anti-usura, che as¬ 
sicura lunga durata al floppy disk 
Diaspron. 

Lappatura "Super Finish": finitu¬ 
ra superficiale realizzata combi¬ 
nando in modo ottimale i parame¬ 
tri pressione, velocità e tempo: la 
superficie così ottenuta ha carat¬ 
teristiche tali da assicurare il mi¬ 
glior contatto con le testine ma¬ 
gnetiche e la massima protezione 
contro l'usura del disco e delle te¬ 
stine stesse. 

Fabbricazione automatica in 
"camera bianca": processo pro¬ 
duttivo esclusivo, automatizzato 
mediante robot ed effettuato in 



Tergidisco 


Coating Extra 
Substrato 


ambiente a livello di polverosità ri¬ 
gorosamente controllato; ciò ga¬ 
rantisce il floppy disk Diaspron 
esente da particelle contaminanti 
di qualsiasi tipo, causa principale 
del ‘Soft Error'. 


Df4SPftON 


Dispositivo tergidisco: la partico¬ 
lare fibrosità del liner assicura la 
costante pulizia del disco, garan¬ 
tendo contemporaneamente un 
attrito compatibile con le esigenze 
del drive. 

Certificazione "Error Free 100%”: 
la certificazione è REALMENTE l'ul¬ 
tima operazione del processo pro¬ 
duttivo: per questo i floppy disks 
Diaspron sono davvero ERROR 
FREE 100% e superano gli stan- 
dards qualitativi più severi delle 
principali Case costruttrici di hard¬ 
ware. 

Ecco perché il floppy disk 
Diaspron vince in superficie! 

Diaspron: microfloppy da 3,5" flop¬ 
py disk da 5,25" e da 8", singola e 
doppia faccia, singola e doppia den¬ 
sità (da 80 Kbytes a 1 Mbyte), com¬ 
patibili con tutti i principali sistemi 
EDP, Word Processors e Personal 
Computers esistenti sul mercato. 


AMICO DEI VOSTRI DATI E DEL VOSTRO DRIVE. 

















MEE 

OBIETTIVO 



HIGH PBECISION 



HIGH PRECISION A COLPO SICURO! 


", 

| Bie 
Roi 
Boi 


MEE ■ Memorie per Elaboratori Elettronici S.p.A. 

Forniture per Centri Elaborazione Dati 
Sede Amm.va: 20144 Milano • Via Boni 29 
Tel. 4988541 (4 linee r.a.) - Telex 324426 MEE-I 
Filiali e Agenzie: Milano - Bergamo - Torino 
Biella - Padova - Parma - Bologna - Firenze - Ancona 
Roma - Napoli - Catania - Oristano - Bari - Genova 
Bolzano - Mestre 


High precision Data Memories 

é tecnologia avanzata di costruzione. 

È il supporto magnetico testato ai limiti 
della resistenza con garanzia di assoluta 
affidabilità. 

È avanguardia tecnologica per assicura' e 
la massima protezione dei dati, 
anche, nelle situazioni più critiche. 




















